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1. INTRODUCTION, 


CP/M is a monitor control program for microcomputer system development 
which uses IBM-compatible flexible disks for backup storage, Using a computer 
mainframe based upon Intel’s 898% microcomputer, CP/M provides a general 
environment for program construction, storage, and editing, along with 
assembly and program check-out facilities. An important feature of CP/M is 
that it can be easily altered to execute with any computer configuration which 
uses an Intel 8980 (or Zilog Z-80@) Central Processing Unit, and has at least 
16K bytes of main memory with up to four IBM-compatible diskette drives, A 
detailed discussion of the modifications required for any particular hardware 
environment is given in the Digital Research document entitled "CP/M System 
Alteration Guide." Although the standard Digital Research version operates on 
a single-density Intel MDS 809%, several different hardware manufacturers 
support their own input-output drivers for CP/M, 


The CP/M monitor provides rapid access to programs through a 
comprehensive file management package. The file subsystem supports a named 
file structure, allowing dynamic allocation of file space as well as 
sequential and random file access, Using this file system, a large number of 
distinct programs can be stored in both source and machine executable form. 


CP/M also supports a powerful context editor, Intel-compatible assembler, 
and debugger subsystems, Optional software includes a _ powerful 
Intel-compatible macro assembler, symbolic debugger, along with various 
high-level languages. When coupled with CP/M’s Console Command Processor, the 
resulting facilities equal or excel similar large computer facilities, 


CP/M is logically divided into several distinct parts: 


BIOS Basic I/O System (hardware dependent) 
BDOS Basic Disk Operating System 

CCP Console Command Processor 

TPA Transient Program Area 


The BIOS provides the primitive operations necessary to access the 
diskette drives and to interface standard peripherals (teletype, CRI, Paper 
Tape Reader/Punch, and user-defined peripherals), and can be tailored by the 
user for any particular hardware environment by "patching" this portion of 
CP/M. The BDOS provides disk management by controlling one or more disk 
drives containing independent file directories. The BDOS implements disk 
allocation strategies which provide fully dynamic file construction while 
minimizing head movement across the disk during access, Any particular file 
may contain any number of records, not exceeding the size of any single disk. 
In a standard CP/M system, each disk can contain up to 64 distinct files, The 


BDOS has entry points which include the following primitive operations which 
can be programmatically accessed: 


SEARCH Look for a particular disk file by name, 

OPEN Open a file for further operations, 

CLOSE Close a file after processing, 

RENAME Change the name of a particular file, 

READ Read a record from a particular file, 

WRITE Write a record onto the disk, 

SELECT Select a particular disk drive for further 
operations, 


The CCP provides symbolic interface between the user’s console and the 
remainder of the CP/M system. The CCP reads the console device and processes 
commands which include listing the file directory, printing the contents of 
files, and controlling the operation of transient programs, such as 
assemblers, editors, and debuggers. The standard commands which are available 
in the CCP are listed in a following section. 


The last segment of CP/M is the area called the Transient Program Area 
(TPA). The TPA holds programs which are loaded from the disk under command of 
the CCP, During program editing, for example, the TPA holds the CP/M text 
editor machine code and data areas, Similarly, programs created under CP/M 
can be checked out by loading and executing these programs in the TPA, 


It should be mentioned that any or all of the CP/M component subsystems 
can be "overlayed" by an executing program. That is, once a user’s program is 
loaded into the TPA, the CCP, BDOS, and BIOS areas can be used as the 
program’s data area. A “bootstrap” loader is programmatically accessible 
whenever the BIOS portion is not overlayed; thus, the user program need only 
branch to the bootstrap loader at the end of execution, and the complete CP/M 
monitor is reloaded from disk, 


It should be reiterated that the CP/M operating system is partitioned 
into distinct modules, including the BIOS portion which defines the hardware 
environment in which CP/M is executing, Thus, the standard system can be 
easily modified to any non-standard environment by changing the peripheral 
drivers to handle the custom system, 


2. FUNCTIONAL DESCRIPTION OF CP/M. 


The user interacts with CP/M primarily through the CCP, which reads and 
interprets canmands entered through the console, In general, the CCP 
addresses one of several disks which are online (the standard system addresses 
up to four different disk drives), These disk drives are labelled A, B, C, 
and D. A disk is “logged in" if the CCP is currently addressing the disk. In 
order to clearly indicate which disk is the currently logged disk, the CCP 
always pranpts the operator with the disk name followed by the symbol ">" 
indicating that the CCP is ready for another command, Upon initial start up, 
the CP/M system is brought in from disk A, and the CCP displays the message 


xxK CP/M VER mm 


where xx is the memory size (in kilobytes) which this CP/M system manages, and 
m.m is the CP/M version number, All CP/M systems are initially set to operate 
in a 16K.memory space, but can be easily reconfigured to fit any memory size 
on the host system (see the MOVCPM transient cammand). Following system 
signon, CP/M automatically logs in disk A, prompts the user with the symbol 
"A>" (indicating that CP/M is currently addressing disk "A"), and waits for a 
command, The canmands are implemented at two levels: built-in commands and 
transient canmands, 


2.1. GENERAL COMMAND STRUCTURE. 
Built-in commands are a part of the CCP program itself, while transient 


commands are loaded into the TPA from disk amd executed. The built-in 
commands are 


ERA Erase specified files, 

DIR List file names in the directory. 

REN Rename the specified file, 

SAVE Save memory contents in a file, 

TYPE Type the contents of a file on the logged disk. 


Nearly all of the canmands reference a particular file or group of files, The 
form of a file reference is specified below. 


2.2. FILE REFERENCES, 


A file reference identifies a particular file or group of files on a 
particular disk attached to CP/M, These file references can be either 
“unambiguous” (ufn) or "ambiguous" (afn). An unambiguous file reference 
uniquely identifies a single file, while an ambiguous file reference may be 


satisfied by a number of different files, 


File references consist of two parts: the primary name and the secondary 
name, Although the secondary name is optional, it usually is generic; that 
is, the secondary name "ASM," for example, is used to denote that the file is 
an assembly language source file, while the primary name distinguishes each 
particular source file, The two names are separated by a "." as shown below: 


PPPPPPPP. SSS 
where pppppppp represents the primary name of eight characters or less, and 


sss is the secondary name of no more than three characters, As mentioned 
above, the name 


PPPPPPPP 
is also allowed and is eguivalent to a secondary name consisting of three 
blanks, The characters used in specifying an unambiguous file reference 
cannot contain any of the special characters 

eee e bw RTT 


while all alphanumerics and remaining special characters are allowed. 


An ambiguous file reference is used for directory search and pattern 
matching. The form of an ambiguous file reference is similar to an 
unambiguous reference, except the symbol "?" may be interspersed throughout 
the primary and secondary names, In various commands throughout CP/M, the "?" 
symbol matches any character of a file name in the "?" position, Thus, the 
ambiguous reference 


X?Z .C?M 
is satisfied by the umambiguous file names 
XYZ .COM 
and 
X3Z .CAM 
Note that the ambiguous reference 
* x 
is equivalent to the ambiguous file reference 


while 


Pppppppp. * 
and 

* sss 
are abbreviations for 


PPPPPPPP. ??? 
and 
22222???.SSS 
respectively. As an example, 
DIR * x 


is interpreted by the CCP as a command to list the names of all disk files in 
the directory, while 


DIR X.Y 
searches only for a file by the name X.Y Similarly, the command 
DIR X?Y.C?M 


causes a search for all (unambiguous) file names on the disk which satisfy 
this ambiguous reference, 


The following file names are valid unambiguous file references: 
».4 XYZ GAMMA 
X.Y XYZ .~COM GAMMA 1 
As an added convenience, the programmer can generally specify the disk 
drive name along with the file name. In this case, the drive name is given as 
a letter A through Z followed by a colon (:). The specified drive is then 
“logged in” before the file operation occurs, Thus, the following are valid 
file names with disk name prefixes: 
A:X.Y B:XYZ C:GAMMA 
Z:XYZ.COM B:X,A?M C:* ASM 
It should also be noted that all alphabetic lower case letters in file 


and drive names are always translated to upper case when they are processed by 
the CCP, 


3. | SWITCHING DISKS, 


The operator can switch the currently logged disk by typing the disk 
drive name (A, B, C, or D) followed by a colon (:) when the CCP is waiting for 
console input. Thus, the sequence of prompts and commands shown below might 
occur after the CP/M system is loaded from disk A: 


16K CP/M VER 1.4 


A>DIR List all files on disk A, 
SAMPLE ASM 

SAMPLE PRN 

ADB: Switch to disk B. 

B>DIR *,ASM List all "ASM" files on B, 
DUMP ASM 

FILES ASM 

B>A: Switch back to A, 


4. THE FORM OF BUILT-IN COMMANDS, 


The file amd device reference forms described above can now be used to 
fully specify the structure of the built-in commands, In the description 
below, assume the following abbreviations: 


ufn - unambiguous file reference 
afn - ambiguous file reference 
cr - carriage return 


Further, recall that the CCP always translates lower case characters to upper 
case characters internally. Thus, lower case alphabetics are treated as if 
they are upper case in canmand names and file references, 


4.1 ERA afn cr 


The ERA (erase) command removes files from the currently logged-in disk 
(i.e., the disk name currently prompted by CP/M preceding the ">"). The files 
which are erased are those which satisfy the ambiguous file reference afn, 
The following examples illustrate the use of ERA: 


ERA X.Y The file named X.Y on the currently logged disk 
is removed from the disk directory, and the space 
is returned, 


ERA X,* All files with primary name X are removed from 
the current disk, 


ERA *,ASM All files with secondary name ASM are removed 
from the current disk, 


ERA X?Y.C?M All files on the current disk which satisfy the 
ambiguous reference X?Y.C?M are deleted, 


ERA *,* Erase all files on the current disk (in this case 
the CCP prompts the console with the message 
"ALL FILES (Y/N) ?" 
which requires a Y response before files are 
actually removed). 


ERA B:*,PRN All files on drive B which satisfy the ambiguous 
reference ????????.PRN are deleted, independently 
of the currently logged disk. 


4.2. DIR afn cr 
The DIR (directory) command causes the names of all files which satisfy 
the ambiguous file name afn to be listed at the console device, As a special 
case, the canmand 
DIR 


lists the files on the currently logged disk (the command "DIR" is equivalent 
to the canmand "DIR *,*"), Valid DIR commands are shown below, 


DIR X.Y 

DIR X?Z.C?M 

DIR ??.Y 

Similar to other CCP commands, the afn can be preceded by a drive name. 

The following DIR cammands cause the selected drive to be addressed before the 
directory search takes place, 

DIR B: 

DIR B:X.Y 

DIR B:*,A?M 


If no files can be found on the selected diskette which satisfy the 
directory request, then the message “NOT FOUND" is typed at the console, 


4.3. REN ufnl=ufn2 cr 


The REN (rename) command allows the user to change the names of files on 
disk, The file satisfying ufn2 is changed to ufnl. The currently logged disk 
is assumed to contain the file to rename (ufnl). The CCP also allows the user 
to type a left-directed arrow instead of the equal sign, if the user’s console 
supports this graphic character, Examples of the REN command are 


REN X, Y=Q.R The file Q.R is changed to X.Y. 
REN XYZ .COM=XYZ.XXX The file XYZ.XXX is changed to XYZ.OCOM, 


The operator can precede either ufnl or ufn2 (or both) by an optional 
drive address, Given that ufnl is preceded by a drive name, then ufn2 is 
assumed to exist on the same drive as ufnl. Similarly, if ufm2 is preceded by 
a drive name, then ufnl is assumed to reside on that drive as well. If both 
ufnl and ufn2 are preceded by drive names, then the same drive must be 


specified in both cases, The following REN commands illustrate this format, 


REN A:X,ASM = Y.ASM The file Y.ASM is changed to X.ASM on 
drive A, 


REN B:ZAP,BAS=ZOT, BAS The file ZOT.BAS is changed to ZAP,BAS 
on drive B, 


REN B:A,ASM = B:A,BAK The file A,BAK is renamed to A.ASM on 
drive B. 


If the file ufnl is already present, the REN command will respond with 
the error "FILE EXISTS" and not perform the change, If ufn2 does not exist on 
the specified diskette, then the message “NOI FOUND" is printed at the 
console, 


4.4, SAVE n ufn cr 
The SAVE cammand places n pages (256-byte blocks) onto disk from the TPA 
and names this file ufn, In the CP/M distribution system, the TPA starts at 
100H (hexadecimal), which is the second page of memory. Thus, if the user’s 
program occupies the area from 1@0@H through 2FFH, the SAVE command must 
specify 2 pages of memory. The machine code file can be subsequently loaded 
and executed, Examples are: 
SAVE 3 X.COM Copies 10@H through 3FFH to X,COM, 
SAVE 48 Q Copies 10@H through 28FFH to Q (note 
that 28 is the page count in 28FFH, 
and that 28H = 2*16+8 = 4@ decimal). 
SAVE 4 X.Y Copies 19@H through 4FFH to X.Y. 


The SAVE command can also specify a disk drive in the afn portion of the 
command, as shown below, 


SAVE 19 B:ZOT,COM Copies 18 pages (19@H through @AFFH) to 
the file ZOT.OOM on drive B, 


4.5. TYPE ufn cr 


The TYPE command displays the contents of the ASCII source file ufn on 
the currently logged disk at the console device, Valid TYPE commands are 


TYPE X.Y 


TYPE X,.PLM 
TYPE XXX 
The TYPE command expands tabs (clt-I characters), assumming tab positions 
are set at every eighth colum, The ufn can also reference a drive name as 
shown below, 


TYPE B:X,PRN The file X.PRN from drive B is displayed. 
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C 5. LINE EDITING AND OUTPUT OONTROL. 


The CCP allows certain line editing functions while typing command lines, 


rubout Delete and echo the last character typed at the 
console, 

ctl-U Delete the entire line typed at the console, 

ctl-x (Same as ctl-U) 

ctl-R Retype current canmand line: types a "clean line” fol- 
lowing character deletion with rubouts, 

ctl-E Physical end of line: carriage is returned, but line 
is not sent until the carriage return key is depressed. 

ctl-C CP/M system reboot (warm start) 

ctl-Z End input from the console (used in PIP and ED). 


The control functions ctl-P and ctl-S affect console output as shown below, 


ctl-P Copy all subseguent console output to the currently 
assigned list device (see the STAT command). Output 
is sent to both the list device and the console device 
¢G until the next ctl-P is typed. 


ctl-S Stop the console output temporarily. Program execution 
and output continue when the next character is typed 
at the console (e.g., another ctl-S). This feature is 
used to stop output on high speed consoles, such as 
CRT’s, in order to view a segment of output before con- 
tinuing. 


Note that the ctl-key sequences shown above are obtained by depressing the 
control and letter keys simultaneously, Further, CCP command lines can 
generally be up to 255 characters in length; they are not acted upon until the 
carriage return key is typed. 
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6. TRANSIENT COMMANDS, 


Transient commands are loaded from the currently logged disk and executed 
in the TPA, The transient canmands defined for execution under the CCP are 
shown below, Additional functions can easily be defined by the user (see the 
LOAD command definition). 


STAT List the number of bytes of storage remaining on the 
currently logged disk, provide statistical information 
about particular files, and display or alter device 
assignment, 


ASM Load the CP/M assembler and assemble the specified 
program from disk. 


LOAD Load the file in Intel "hex" machine code format and 
produce a file in machine executable form which can be 
loaded into the TPA (this loaded program becomes a 
new command under the CCP), 


DDT Load the CP/M debugger into TPA and start execution, 

PIP Load the Peripheral Interchange Program for subsequent 
disk file and peripheral transfer operations, 

ED Load and execute the CP/M text editor program, 

SYSGEN Create a new CP/M system diskette, 

SUBMIT Submit a file of commands for batch processing. 

DUMP Dump the contents of a file in hex. 

MOVCPM Regenerate the CP/M system for a particular memory 
size, 


Transient commands are specified in the same manner as built-in commands, and 
additional conmands can be easily defined by the user, As an added 
convenience, the transient cammand can be preceded by a drive name, which 
causes the transient to be loaded from the specified drive into the TPA for 
execution, Thus, the command 


B:STAT 
causes CP/M to temporarily “log in" drive B for the source of the STAT 


transient, and then return to the original logged disk for subsequent 
processing. 


iz 


The basic transient commands are listed in detail below. 
6.1. STAT cr 


The STAT command provides general statistical information about file 
storage and device assignment. It is initiated by typing one of the following 
forms: 


STAT cr 
STAT “command line" cr 


Special forms of the "command line” allow the current device assignment to be 
examined and altered as well. The various command lines which can be 
specified are shown below, with an explanation of each form shown to the 
right, 


STAT cr If the user types an empty command line, the STAT 
transient calculates the storage remaining on all 
active drives, and prints a message 


x: R/W, SPACE: nnnk 
or 
x: R/O, SPACE: nnnk 


for each active drive x, where R/W indicates the 
drive may be read or written, and R/O indicates 
the drive is read only (a drive becomes R/O by 
explicitly setting it to read only, as shown 
below, or by inadvertantly changing diskettes 
without performing a warm start). The space 
remaining on the diskette in drive x is given 
in kilobytes by nnn, 


STAT x: cr If a drive name is given, then the drive is 
selected before the storage is computed. Thus, 
the command “STAT B:" could be issued while 
logged into drive A, resulting in the message 


BYTES REMAINING ON B: nnnk 
STAT afn cr The command line can also specify a set of files 
to be scanned by STAT, The files which satisfy 
afn are listed in alphabetical order, with stor- 
age requirements for each file under the heading 


RECS BYTS EX D: FILENAME,TYP 
rrrr bbbK ee d:pppppppp.sss 


where rrrr is the number of 128-byte records 
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allocated to the file, bbb is the number of kilo- 
bytes allocated to the file (bbb=rrrr*128/1024) , 
ee is the number of 16K extensions (ee=bbb/16) , 

d is the drive name containing the file (A...2), 
pppppppp is the (up to) eight-character primary 
file name, and sss is the (up to) three-character 
secondary name, After listing the individual 
files, the storage usage is summarized, 


STAT x:afn cr As a convenience, the drive name can be given 
ahead of the afn. In this case, the specified 
drive is first selected, and the form "STAT afn" 
is executed, 


STAT x:=R/O cr This form sets the drive given by x to read-only, 
which remains in effect until the next warm or 
cold start takes place. When a disk is read-only, 
the message 


BDOS ERR ON x: READ ONLY 


will appear if there is an attempt to write to 
the read-only disk x. CP/M waits until a key 
is depressed before performing an automatic warm 
start (at which time the disk becomes R/W). 


The STAT command also allows control over the physical to logical device 
assignment (see the IOBYTE function described in the manuals “CP/M Interface 
Guide" and "CP/M System Alteration Guide"), In general, there are four 
logical peripheral devices which are, at any particular instant, each assigned 
to one of several physical peripheral devices, The four logical devices are 
named: 


CON: The system console device (used by CCP 
for communication with the operator) 

RDR: The paper tape reader device 

PUN: The paper tape punch device 

LST: The output list device 


The actual devices attached to any particular computer system are driven 
by subroutines in the BIOS portion of CP/M. Thus, the logical RDR: device, 
for example, could actually be a high speed reader, Teletype reader, or 
cassette tape. In order to allow some flexibility in device naming and 
assignment, several physical devices are defined, as shown below: 
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TTY: Teletype device (slow speed console) 


CRT: Cathode ray tube device (high speed console) 

BAT: Batch processing (console is current RDR:, 
output goes to current LST: device) 

UC1: User-defined console 

PTR: Paper tape reader (high speed reader) 

URI: User-defined reader #1 

UR2: User-defined reader #2 

PIP: Paper tape punch (high speed punch) 

UP1: User-defined punch #1 

UP2: User-defined punch #2 

LPT: Line printer 

ULL: User-defined list device #1 


It must be emphasized that the physical device names may or may not 
actually correspond to devices which the names imply. That is, the PIP: 
device may be implemented as a cassette write operation, if the user wishes, 
The exact correspondence and driving subroutine is defined in the BIOS portion 
of CP/M, In the standard distribution version of CP/M, these devices 
correspond to their names on the MDS 890 development system, 


The possible logical to physical device assignments can be displayed by 
typing 
STAT VAL: cr 


The STAT prints the possible values which can be taken on for each logical 
device: 


CON. = TTY: CRI: BAT: UCI: 
RDR: = TTY: PIR: URI: UR2: 
PUN: = TTY: PIP: UPl: UP2: 
LST: = TTY: CRI: LPY: ULL: 


In each case, the logical device shown to the left can take any of the four 
physical assignments shown to the right on each line, The current logical to 
physical mapping is displayed by typing the command 


STAT DEV: cr 


is 


which produces a listing of each logical device to the left, and the current 
corresponding physical device to the right, For example, the list might 
appear as follows: 


CON: = CRT: 
RDR: = URI: 
PUN: = PIP: 
LST: = TTY: 


The current logical to physical device assignment can be changed by typing a 
STAT command of the form 


STAT 1dl = pdl, 1d2 = pd2 , ... , 1dn = pdn cr 
where ldl through ldn are logical device names, and pdl through pdn are 
compatible physical device names (i.e., ldi and pdi appear on the same line in 
the "VAL:" cammand shown above). The following are valid STAT commands which 
change the current logical to physical device assignments: 


STAT QON:=CRT: cr 
STAT PUN: = TTY:,LST:=LPT:, RDOR:=TTY: cr 


6.2. ASM ufn cr 
The ASM command loads and executes the CP/M 8080 assembler, The ufn 
specifies a source file containing assembly language statements where the 
secondary name is assumed to be ASM, and thus is not specified. The following 
ASM commands are valid: 
ASM X 
ASM GAMMA 


The two-pass assembler is automatically executed, If assembly errors occur 
during the second pass, the errors are printed at the console, 


The assembler produces a file 
X.PRN 
where x is the primary name specified in the ASM command. The PRN file 
contains a listing of the source program (with imbedded tab characters if 


present in the source program), along with the machine code generated for each 
statement and diagnostic error messages, if any. The PRN file can be listed 
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at the console using the TYPE command, or sent to a peripheral device using 
PIP (see the PIP command structure below). Note also that the PRN file 
contains the original source program, augmented by miscellaneous assembly 
information in the leftmost 16 columns (program addresses and hexadecimal 
machine code, for example). Thus, the PRN file can serve as a backup for the 
original source file: if the source file is accidently removed or destroyed, 
the PRN file can be edited (see the ED operator’s guide) by removing the 
leftmost 16 characters of each line (this can be done by issuing a single 
editor “macro” canmand). The resulting file is identical to the original 
source file and can be renamed (REN) from PRN to ASM for subsequent editing 
and assembly, The file 


X.HEX 


is also produced which contains 808% machine language in Intel “hex” format 
Suitable for subsequent loading and execution (see the LOAD command), For 
complete details of CP/M’s assembly language program, see the "CP/M Assembler 
Language (ASM) User’s Guide," 


Similar to other transient commands, the source file for assembly can be 
taken from an a.ternate disk by prefixing the assembly language file name by a 
disk drive name, Thus, the command 

ASM B:ALPHA cr 
loads the assembler from the currently logged drive and operates upon the 
source program ALPHA.ASM on drive B, The HEX and PRN files are also placed on 
drive B in this case, 

6.3. LOAD ufn cr 

The LOAD command reads the file ufn, which is assumed to contain "hex" 
format machine code, and produces a memory image file which can be 
subsequently executed, The file name ufn is assumed to be of the form 

XHEX 


and thus only the name x need be specified in the command, The LOAD command 
creates a file named 


X.COM 
which marks it as containing machine executable code. The file is actually 
loaded into memory and executed when the user types the file name x 
immediately after the prompting character ">" printed by the CCP, 
In general, the CCP reads the name x following the prompting character 


and looks for a built-in function name. If no function name is found, the CCP 
searches the system disk directory for a file by the name 
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X.COM 


If found, the machine code is loaded into the TPA, and the program executes, 
Thus, the user need only LOAD a hex file once; it can be subsequently 
executed any number of times by simply typing the primary name. In this way, 
the user can “invent" new commands in the CCP, (Initialized disks contain the 
transient commands as OOM files, which can be deleted at the user’s option.) 
The operation can take place on an alternate drive if the file name is 
prefixed by a drive name. Thus, 


LOAD B:BETA 


brings the LOAD program into the TPA from the currently logged disk and 
operates upon drive B after execution begins, 


It must be noted that the BETA.HEX file must contain valid Intel format 
hexadecimal machine code records (as produced by the ASM program, for example) 
which begin at 100H, the beginning of the TPA, Further, the addresses in the 
hex records must be in ascending order; gaps in unfilled memory regions are 
filled with zeroes by the LOAD command as the hex records are read. Thus, 
LOAD must. be used only for creating CP/M standard "COM" files which operate in 
the TPA, Programs which occupy regions of memory other than the TPA can be 
loaded under DDI, 


6.4. PIP cr 


PIP is the CP/M Peripheral Interchange Program which implements the basic 
media conversion operations necessary to load, print, punch, copy, and combine 
disk files, The PIP program is initiated by typing one of the following forms 


(1) PIP cr 
(2) PIP “command line" cr 


In both cases, PIP is loaded into the TPA and executed, In case (1), PIP 
reads canmand lines directly from the console, prompted with the "*" 
character, until an empty cammand line is typed (i.e., a single carriage 
return is issued by the operator). Each successive command line causes some 
media conversion to take place according to the rules shown below, Form (2) 
of the PIP command is equivalent to the first, except that the single command 
line given with the PIP command is automatically executed, and PIP terminates 
immediately with no further prompting of the console for input command lines, 
The form of each canmand line is 


destination = source#l, source#2, ... , Ssource#n cr 


where "destination" is the file or peripheral device to receive the data, and 
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"“source#l, ..., source#n"” represents a series of one or more files or devices 
which are copied from left to right to the destination, 


When multiple files are given in the command line (i.e, n> 1), the 
individual files are assumed to contain ASCII characters, with an assumed CP/M 
end-of-file character (ctl-Z) at the end of each file (see the O parameter to 
override this assumption). The egual symbol (=) can be replaced by a 
left-oriented arrow, if your console supports this ASCII character, to improve 
readability, Lower case ASCII alphabetics are internally translated to upper 
case to be consistent with CP/M file and device name conventions, Finally, 
the total command line length cannot exceed 255 characters (ctl-E can be used 
to force a physical carriage return for lines which exceed the console width). 


The destination and source elements can be unambiguous references to CP/M 
source files, with or without a preceding disk drive name. That is, any file 
can be referenced with a preceding drive name (A:, B:, C:, or D:) which 
defines the particular drive where the file may be obtained or stored, When 
the drive name is not included, the currently logged disk is assumed, 
Further, the destination file can also appear as one or more of the source 
files, in which case the source file is not altered until the entire 
concatenation is complete. If the destination file already exists, it is 
removed if the command line is properly formed (it is not removed if an error 
condition arises). The following command lines (with explanations to the 
right) are valid as input to PIP: 


X =Yoer Copy to file xX from file Y, 
where X and Y are unambiguous 
file names; Y remains unchanged, 


X =Y,Z cr Concatenate files Y and Z and 
copy to file X, with Y and Z 
unchanged, 

X.ASM=Y.ASM,Z.ASM,FIN.ASM cr Create the file X.ASM from the 
concatenation of the Y, Z, and 
FIN files with type ASM, 

NEW.ZOT = B:OLD,ZAP cr Move a copy of OLD.ZAP from drive 
B to the currently logged disk; 
name the file NEW,ZOT. 

B:A.U = B:B.V,A:C.W,D.X cr Concatenate file B.V from drive B 


with C.W from drive A and D.xX. 
from the logged disk; create 
the file A.U on drive B. 


For more convenient use, PIP allows abbreviated commands for transferring 
files between disk drives, The abbreviated forms are 


19 


PIP x:=afn cr 
PIP x:=y:afn cr 
PIP ufn = y: cr 
PIP x:ufM = y: cr 


The first form copies all files from the currently logged disk which satisfy 
the afn to the same file names on drive x (x = A...Z). The second form is 
equivalent to the first, where the source for the copy is drive y (y = A... 
Z). The third form is equivalent to the command "PIP ufn=y:ufn cr" which 
copies the file given by ufn from drive y to the file ufn on drive x. The 
fourth form is equivalent to the third, where the source disk is explicitly 
given by y. 


Note that the source and destination disks must be different in all of 
these cases, If an afn is specified, PIP lists each ufn which satisfies the 
afn as it is being copied. If a file exists by the same name as the 
destination file, it is removed upon successful completion of the copy, and 
replaced by the copied file, 


The following PIP commands give examples of valid disk-to-disk copy 
operations: 


B:=* ,COM cr Copy all files which have the 
secondary name “COM” to drive B 
from the current drive, 


A:=B:ZAP,.* cr Copy all files which have the 
primary name "ZAP" to drive A 
from drive B. 


ZAP.ASM=B: cr Equivalent to ZAP,ASM=B:ZAP,ASM 
B:ZOT,OOM=A: cr Eguivalent to B:ZOT,COM=A:ZOT.COM 
B:=GAMMA,BAS cr Same as B:GAMMA,BAS=GAMMA, BAS 
B:=A:GAMMA,BAS cr Same as B:GAMMA,BAS=A:GAMMA,BAS 


PIP also allows reference to physical and logical devices which are 
attached to the CP/M system, The device names are the same as given under the 
STAT command, along with a number of specially named devices, The logical 
devices given in the STAT command are 

CON: (console), RDR: (reader), PUN: (punch), and LST: (list) 


while the physical devices are 
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TTY: (console, reader, punch, or list) 
CRT: (console, or list), UC1l: (console) 
PTR: (reader), UR1: (reader), UR2: (reader) 
PTP: (punch), UPl: (punch), UP2: (punch) 
LPT: (list), ULl: (list) 


(Note that the “BAT:" physical device is not included, since this assignment 
is used only to indicate that the RDR: and LST: devices are to be used for 
console input/output.) 


The RDR, LST, PUN, and COON devices are all defined within the BIOS 
portion of CP/M, and thus are easily altered for any particular I/O system, 
(The current physical device mapping is defined by IOBYTE; see the "CP/M 
Interface Guide” for a discussion of this function). The destination device 
must be capable of receiving data (i.e., data cannot be sent to the punch), 
and the source devices must be capable of generating data (i.e., the LST: 
device cannot be read). 


The additional device names which can be used in PIP commands are 


NUL: Send 48 "nulls" (ASCII @°s) to the device 
(this can be issued at the end of punched output). 


EOF: Send a CP/M end-of-file (ASCII ctl-Z) to the 
destination device (sent automatically at the 
end of all ASCII data transfers through PIP). 


INP: Special PIP input source which can be "patch 
into the PIP program itself: PIP gets the input 
data character-by-character by CALLing location 
103H, with data returned in location 109H (parity 
bit must be zero), 


OUT: Special PIP output destination which can be 
patched into the PIP program: PIP CALLs location 
106H with data in register C for each character 
to transmit, Note that locations 109H through 
1FFH of the PIP memory image are not used and 
can be replaced by special purpose drivers using 
DDI (see the DDT operators manual). 


PRN: Same as LST:, except that tabs are expanded at 
every eighth character position, lines are 
numbered, and page ejects are inserted every 60 
lines, with an initial eject (same as [t8np]). 


File and device names can be interspersed in the PIP commands, In each 
case, the specific device is read wntil end-of-file (ctl-Z for ASCII files, 
and a real end of file for non-ASCII disk files), Data from each device or 
file is concatenated from left to right until the last data source has been 
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read. The destination device or file is written using the data from the 
source files, and an end-of-file character (ctl-Z) is appended to the result 
for ASCII files, Note if the destination is a disk file, then a temporary 
file is created ($$$ secondary name) which is changed to the actual file name 
only upon successful campletion of the copy. Files with the extension "COM" 
are always assumed to be non-ASCII, 


The copy operation can be aborted at any time by depressing any key on 
the keyboard (a rubout suffices), PIP will respond with the message "ABORTED" 
to indicate that the operation was not completed. Note that if any operation 
is aborted, or if an error occurs during processing, PIP removes any pending 
commands which were set up while using the SUBMIT command, 


It should also be noted that PIP performs a special function if the 
destination is a disk file with type "HEX" (an Intel hex formatted machine 
code file), and the source is an external peripheral device, such as a paper 
tape reader, In this case, the PIP program checks to ensure that the source 
file contains a properly formed hex file, with legal hexadecimal values and 
checksum records, When an invalid input record is found, PIP reports an error 
message at the console and waits for corrective action. It is usually 
sufficient to open the reader and rerun a section of the tape (pull the tape 
back about 2@ inches). When the tape is ready for the re-read, type a single 
carriage return at the console, and PIP will attempt another read, If the 
tape position cannot be properly read, simply continue the read (by typing a 
return following the error message), and enter the record manually with the ED 
program after the disk file is constructed. For convenience, PIP allows the 
end-of-file to be entered from the console if the source file is a RDR: 
device, In this case, the PIP program reads the device and monitors the 
keyboard, If ctl-Z is typed at the keyboard, then the read operation is 
terminated normally. 


Valid PIP commands are shown below. 


PIP LST: = X,PRN cr Copy X.PRN to the LST device and 
terminate the PIP program. 


PIP cr Start PIP for a sequence of 
commands (PIP prompts with "*"), 


*QON:=X.ASM,Y.ASM,Z.ASM cr Concatenate three ASM files and 
copy to the CON device. 


*X HEX=CON: , Y.HEX,PTR: cr Create a HEX file by reading the 
COON (until a ctl-Z is typed), fol- 
lowed by data from Y.HEX, followed 
by data from PIR until a ctl-2Z is 
encountered, 


*cr Single carriage return stops PIP, 


22 


PIP PUN:=NUL: ,X.ASM,EOF:,NUL: cr Send 48 nulls to the punch device; 
then copy the X.ASM file to the 
punch, followed by an end-of-file 
(ctl=-Z) and 4@ more null charac- 
ters, 


The user can also specify one or more PIP parameters, enclosed in left 
and right square brackets, separated by zero or more blanks, Each parameter 
affects the copy operation, and the enclosed list of parameters must 
immediately follow the affected file or device. Generally, each parameter can 
be followed by an optional decimal integer value (the S and Q parameters are 
exceptions). The valid PIP parameters are listed below. 


B Block mode transfer: data is buffered by PIP until an ASCII 
x-off character (ctl-S) is received from the source device, 
This allows transfer of data to a disk file from a continuous 
reading device, such aS a cassette reader. Upon receipt of 
the x-off, PIP clears the disk buffers and returns for more 
input data, The amount of data which can be buffered is de- 
pendent upon the memory size of the host system (PIP will 
issue an error message if the buffers overflow). 


Dn Delete characters which extend past column n in the transfer 
of data to the destination from the character source, This 
parameter is used’mst often to truncate long lines which are 
sent to a (narrow) ‘printer or console device, 


E Echo all transfer-operations to the console as they are being 
performed, 
F Filter form feeds from the file, All imbedded form feeds are 


removed, The P parameter can be used simultaneously to 
insert new form feeds, 


H Hex data. transfer: all data is checked for proper Intel hex 
file format. Non-essential characters between hex records 
are removed during the copy operation, The console will be 
prompted for corrective action in case errors occur, 


I Ignore ":88" records in the transfer of Intel hex format 
file (the I parameter automatically sets the H parameter). 

L Translate upper case alphabetics to lower case, 

N Add line numbers to each line transferred to the destination 


starting at one, and incrementing by 1, Leading zeroes are 
suppressed, and the number is followed by a colon, If N2 

is specified, then leading zeroes are included, and a tab is 
inserted following the number, The tab is expanded if T is 
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set. 


O Object file (non-ASCII) transfer: the normal CP/M end of 
file is ignored, 


Pn Include page ejects at every n lines (with an initial page 
eject). If n= 1 or is excluded altogether, page ejects 
occur every 6@ lines, If the F parameter is used, form feed 
suppression takes place before the new page ejects are 
inserted, 


Qstz Quit copying from the source device or file when the 
string s (terminated by ctl-Z) is encountered, 


Sstz Start copying from the source device when the string s is 
encountered (terminated by ctl-Z). The S and Q parameters 
can be used to “abstract” a particular section of a file 
(such aS a subroutine), The start and quit strings are al- 
ways included in the copy operation, 


NOTE - the strings following the s and g parameters are 
translated to upper case by the CCP if form (2) of the 
PIP command is used, Form (1) of the PIP invocation, how- 
ever, does not perform the automatic upper case translation, 
(1) PIP cr 
(2) PIP “command line" cr 


Tn Expand tabs (ctl-I characters) to every nth colum during the 
transfer of characters to the destination from the source, 


U Translate lower case alphabetics to upper case during the 
the copy operation, 

V Verify that data has been copied correctly by rereading 
after the write operation (the destination must be a disk 
file). 

Z zero the parity bit on input for each ASCII character, 


The following are valid PIP commands which specify parameters in the file 
transfer: 


PIP X,ASM=B:[v] cr Copy X.ASM from drive B to the current drive 
and verify that the data was properly copied. 


PIP LPT:=X,ASM[nt8u] cr Copy X.ASM to the LPT: device; number each 
line, expand tabs to every eighth colum, and 
translate lower case alphabetics to upper 
case, 


24 


PIP PUN:=X.HEX[i] ,Y.ZOT[h] cr First copy X.HEX to the PUN: device and 
ignore the trailing ":80" record in X.HEX; 
then continue the transfer of data by reading 
Y.ZOT, which contains hex records, including 
any ":@8" records which it contains, 


PIP X,LIB = Y.ASM [ sSUBR1:'z qJMP L3?z ] cr Copy from the file Y.ASM 
into the file X,LIB, Start the copy when the 
string "SUBR1:" has been found, and quit copy- 
ing after the string "JMP L3" is encountered, 


PIP PRN:=X.ASM [p59] Send X.ASM to the LST: device, with line num 
bers, tabs expanded to every eighth column, 
and page ejects at every 5@th line. Note that 
nt8p6@ is the assumed parameter list for a PRN 
file; p5@ overrides the default value. 


6.5. ED ufn cr 


The ED program is the CP/M system context editor, which allows creation 
and alteration of ASCII files in the CP/M environment. Complete details of 
operation are given the ED user’s manual, "ED: a Context Editor for the CP/M 
Disk System." In general, ED allows the operator to create and operate upon 
source files which are organized as a sequence of ASCII characters, separated 
by end-of-line characters (a carriage-return line-feed sequence). There is no 
practical restriction on line length (no single line can exceed the size of 
the working memory), which is instead defined by the number of characters 
typed between cr’s. The ED program has a number of commands for character 
string searching, replacement, and insertion, which are useful in the creation 
and correction of programs or text files under CP/M. Although the CP/M has a 
limited memory work space area (approximately 5@@@ characters in a 16K CP/M 
system), the file size which can be edited is not limited, since data is 
easily "paged" through this work area, 


Upon initiation, ED creates the specified source file, if it does not 
exist, and opens the file for access, The programmer then "appends" data from 
the source file into the work area, if the source file already exists (see the 
A command), for editing. The appended data can then be displayed, altered, 
and written from the work area back to the disk (see the W command). 
Particular points in the program can be automatically paged and located by 
context (see the N command), allowing easy access to particular portions of a 
large file, 


Given that the operator has typed 


ED X.ASM cr 
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the ED program creates an intermediate work file with the name 


X.$$$ 


to hold the edited data during the ED run, Upon completion of ED, the X.ASM 
file (original file) is renamed to X,BAK, and the edited work file is renamed 
to X.ASM. Thus, the X,BAK file contains the original (unedited) file, and the 
X.ASM file contains the newly edited file, The operator can always return to 
the previous version of a file by removing the most recent version, and 
renaming the previous version, Suppose, for example, that the current X,ASM 
file was improperly edited; the sequence of CCP command shown below would 
reclaim the backup file, 


DIR X.* Check to see that BAK file 
is available, 

ERA X.ASM Erase most recent version, 

REN X,ASM=X, BAK Rename the BAK file to ASM, 


Note that the operator can abort the edit at any point (reboot, power failure, 
ctl-C, or Q command) without destroying the original file, In this case, the 
BAK file is not created, and the original file is always intact, 


The ED program also allows the user to “ping-pong” the source and create 
backup files between two disks. The form of the ED command in this case is 


ED ufn d: 


where ufn is the name of a file to edit on the currently logged disk, and d is 
the name of an alternate drive, The ED program reads and processes the source 
file, and writes the new file to drive d, using the name ufn. Upon completion 
of processing, the original file becomes the backup file, Thus, if the 
operator is addressing disk A, the following command is valid: 


ED X.ASM B: 


which edits the file X.ASM on drive A, creating the new file xX.$SS on drive 
B. Upon canpletion of a successful edit, A:X.ASM is renamed to A:X.BAK, and 
B:X.$$$ is renamed to B:X.ASM. For user convenience, the currently logged 
disk becomes drive B at the end of the edit. Note that if a file by the name 
B:X.ASM exists before the editing begins, the message 


FILE EXISTS 
is printed at the console as a precaution against accidently destroying a 


source file. In this case, the operator must first ERAse the existing file 
and then restart the edit operation, 
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Similar to other transient canmands, editing can take place on a drive 
different from the currently logged disk by preceding the source file name by 
a drive name, Examples of valid edit requests are shown below 


ED A:X.ASM Edit the file X.ASM on drive A, with 
new file and backup on drive A. 


ED B:X.ASM A: Edit the file X.ASM on drive B to the 
temporary file x.$$$ on drive A, On 
termination of editing, change X,ASM 
on drive B to X,.BAK, and change X.$$$ 
on drive A to X,ASM, 


6.6. SYSGEN cr 


The SYSGEN transient command allows generation of an initialized diskette 
containing the CP/M operating system. The SYSGEN program prompts the console 
for canmands, with interaction as shown below. 


SYSGEN cr Initiate the SYSGEN program. 
SYSGEN VERSION m.m SYSGEN sign-on message, 


SOURCE DRIVE NAME (OR RETURN TO SKIP) 

Respond with the drive name (one 
of the letters A, B, C, or D) of 
the disk containing a CP/M sys- 
tem; usually A, If a copy of 
CP/M already exists in memory, 
due to a MOVCPM command, type a 
cr only. Typing a drive name 

x will cause the response: 


SOURCE ON x THEN TYPE RETURN Place a diskette containing the 
CP/M operating system on drive 
x (x is one of A, B, C, or D). 
Answer with cr when ready. 


FUNCTION COMPLETE System is copied to memory. 
SYSGEN will then prompt with: 


DESTINATION DRIVE NAME (OR RETURN TO REBOOT) 

If a diskette is being ini- 
tialized, place the new disk 
into a drive and answer with 
the drive name, Otherwise, type 
a cr and the system will reboot 
from drive A. Typing drive name 
x will cause SYSGEN to prompt 
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with: 


DESTINATION ON x THEN TYPE RETURN Place new diskette into drive 
x; type return when ready. 


FUNCTION COMPLETE New diskette is initialized 
in drive x. 


The “DESTINATION” prompt will be repeated until a single carriage return is 
typed at the console, so that more than one disk can be initialized. 


Upon campletion of a successful system generation, the new diskette 
contains the operating system, and only the built-in commands are available, 
A factory-fresh IBM-compatible diskette appears to CP/M as a diskette with an 
empty directory; therefore, the operator must copy the appropriate OOM files 
from an existing CP/M diskette to the newly constructed diskette using the PIP 
transient, 


The user can copy all files from an existing diskette by typing the PIP 
command 


PIP B: = As *,*[v] cr 


which copies all files from disk drive A to disk drive B, and verifies that 
each file has been copied correctly, The name of each file is displayed at 
the console as the copy operation proceeds, 


It should be noted that a SYSGEN does not destroy the files which already 
exist on a diskette; it results only in construction of a new operating 
system. Further, if a diskette is being used only on drives B through D, and 
will never be the source of a bootstrap operation on drive A, the SYSGEN need 
not take place, In fact, a new diskette needs absolutely no initialization to 
be used with CP/M, 


6.7. SUBMIT ufn parm#l ... parm#n cr 


The SUBMIT command allows CP/M commands to be batched together for 
automatic processing, The ufn given in the SUBMIT command must be the 
filename of a file which exists on the currently logged disk, with an assumed 
file type of “SUB.” The SUB file contains CP/M prototype commands, with 
possible parameter substitution, The actual parameters parm#l ... parm#n are 
substituted into the prototype commands, and, if no errors occur, the file of 
substituted canmands are processed sequentially by CP/M. 
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The prototype command file is created using the ED program, with 
interspersed "$" parameters of the form 


Sl $2 $3 «seo $n 


corresponding to the number of actual parameters which will be included when 
the file is submitted for execution. When the SUBMIT transient is executed, 
the actual parameters parm#] ... parm#n are paired with the formal parameters 
$1 ... $n in the prototype commands, If the number of formal and actual 
parameters does not correspond, then the submit function is aborted with an 
error message at the console, The SUBMIT function creates a file of 
substituted canmands with the name 


$$$ SUB 


on the logged disk. When the system reboots (at. the termination of the 
SUBMIT), this cammand file is read by the CCP as a source of input, rather 
than the console, If the SUBMIT function is performed on any disk other than 
drive A, the commands are not processed until the disk is inserted into drive 
A and the system reboots, Further, the user can abort cammand processing at 
any time by typing a rubout when the command is read and echoed, In this 
case, the $$$.SUB file is removed, and the subsequent commands come from the 
console. Command processing is also aborted if the CCP detects an error in 
any of the canmmands, Programs which execute under CP/M can abort processing of 
command files when error conditions occur by simply erasing any existing 
$$$.SUB file. 


In order to introduce dollar signs into a SUBMIT file, the user may type 
a “$$" which reduces to a single "$" within the command file, Further, an 
up-arrow symbol "*" may precede an alphabetic character x, which produces a 
single ctl-x character within the file, 


The last cammand in a SUB file can initiate another SUB file, thus 
allowing chained batch commands, 


Suppose the file ASMBL.SUB exists on disk and contains the prototype 
commands 


PIP $2:=$1,.PRN 
ERA $1.PRN 


and the canmand 
SUBMIT ASMBL X PRN cr 


is issued by the operator, The SUBMIT program reads the ASMBL.SUB file, 


substituting "X" for all occurrences of $1 and "PRN" for all occurrences of 
$2, resulting in a $$$,SUB file containing the commands 
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ASM X 

DIR X.* 

ERA *,BAK 

PIP PRN:=X, PRN 
ERA X,PRN 


which are executed in sequence by the CCP, 


The SUBMIT function can access a SUB file which is on an alternate drive 
by preceding the file name by a drive name. Submitted files are only acted 
upon, however, when they appear on drive A, Thus, it is possible to create a 
submitted file on drive B which is executed at a later time when it is 
inserted in drive A, 


6.8. DUMP ufn cr 


The DUMP program types the contents of the disk file (ufn) at the console 
in hexadecimal form, The file contents are listed sixteen bytes at a time, 
with the absolute byte address listed to the left of each line in 
hexadecimal, Long typeouts can be aborted by pushing the rubout key during 
printout, (The source listing of the DUMP program is given in the "CP/M 
Interface Guide” as an example of a program written for the CP/M environment.) 


6.9. MOVCPM cr 


The MOVCPM program allows the user to reconfigure the CP/M system for any 
particular memory size. Two optional parameters may be used to indicate (1) 
the desired size of the new system and (2) the disposition of the new system 
at program termination, If the first parameter is amitted or a "*" is given, 
the MOVCPM program will reconfigure the system to its maximum size, based upon 
the kilobytes of contiguous RAM in the host system (starting aat @@@9H). If 
the second parameter is amitted, the system is executed, but not permanently 
recorded; if "*" is given, the system is left in memory, ready for a SYSGEN 
operation, The MOVCPM program relocates a memory image of CP/M and places 
this image in memory in preparation for a system generation operation, The 
command forms are: 


MOVCPM cr Relocate and execute CP/M for manage- 
ment of the current memory configura- 
tion (memory is examined for contigu- 
ous RAM, starting at 100H). Upon com 
pletion of the relocation, the new 
system is executed but not permanently 
recorded on the diskette, The system 
which is constructed contains a BIOS 
for the Intel MDS 880. 
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MOVCPM n cr Create a relocated CP/M system for 
management of an n kilobyte system (n 
must be in the range 16 to 64), and 
execute the system, as described above, 


MOVCPM * * cr Construct a relocated memory image for 
the current memory configuration, but 
leave the memory image in memory, in 
preparation for a SYSGEN operation, 


MOVCPM n * cr Construct a relocated memory image for 
an n kilobyte memory system, and leave 
the memory image in preparation for a 
SYSGEN operation, 


The canmand 
MOVCPM * * 


for example, constructs a new version of the CP/M system and leaves it in 
memory, ready for a SYSGEN operation, The message 


READY FOR "SYSGEN" OR 
"SAVE 32 CPMxx.COM" 


is printed at the console upon completion, where xx is the current memory size 
in kilobytes, The operator can then type 


SYSGEN cr Start the system generation, 


SOURCE DRIVE NAME (OR RETURN TO SKIP) Respond with a cr to skip 
the CP/M read operation since the system 
is already in memory as a result of the 
previous MOVCPM operation, 


DESTINATION DRIVE NAME (OR RETURN T@ REBOOT) 
Respond with B to write new system 
to the diskette in drive B. SYSGEN 
will prompt with: 

DESTINATION ON B, THEN TYPE RETURN 
Ready the fresh diskette on drive 
B and type a return when ready. 


Note that if you respond with "A" rather than "B" above, the system will be 
written to drive A rather than B. SYSGEN will continue to type the prompt: 


DESTINATION DRIVE NAME (OR RETURN TO REBOOT) 


until the operator responds with a single carriage return, which stops the 
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SYSGEN program with a system reboot, 


The user can then go through the reboot process with the old or new 
diskette, Instead of performing the SYSGEN operation, the user could have 


typed 
SAVE 32 CPMxx.COM 


at the canpletion of the MOVCPM function, which would place the CP/M memory 
image on the currently logged disk in a form which can be “patched.” This is 
necessary when operating in a non-standard environment where the BIOS must be 
altered for a particular peripheral device configuration, as described in 
the"CP/M System Alteration Guide," 


Valid MOVCPM commands are given below: 


MOVCPM 48 cr Construct a 48K verskon of CP/M and start 
execution, 
MOVCPM 48 * cr Construct a 48K version of CP/M in prepara- 


tion for permanent recording; response is 


READY FOR "SYSGEN" OR 
"SAVE 32CPM48, COM" 


MOVCPM * * cr Construct a maximum memory version of CP/M 
and start execution, 


It is important to note that the newly created system is serialized with 
the number attached to the original diskette and is subject to the conditions 
of the Digital Research Software Licensing Agreement, 
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7. BDOS ERROR MESSAGES, 


There are three error situations which the Basic Disk Operating System 
intercepts during file processsing. When one of these conditions is detected, 
the BDOS prints the message: 


BDOS ERR ON x: error 
where x is the drive name, and "error" is one of the three error messages: 


BAD SECTOR 
SELECT 
READ ONLY 


The "BAD SECTOR" message indicates that the disk controller electronics 
has detected an error condition in reading or writing the diskette, This 
condition is generally due to a malfunctioning disk controller, or an 
extremely worn diskette, If you find that your system reports this error more 
than once a month, you should check the state of your controller electronics, 
and the condition of your media. You may also encounter this condition in 
reading files generated by a controller produced by a different manufacturer. 
Even though controllers are claimed to be IBM-compatible, one often finds 
small differences in recording formats, The MDS-80@@ controller, for example, 
requires two bytes of one’s following the data CRC byte, which is not reguired 
in the IBM format. As a result, diskettes generated by the Intel MDS can be 
read by almost all other IBM-compatible systems, while disk files generated on 
other manufacturer’s equipment will produce the "BAD SECTOR" message when read 
by the MDS, In any case, recovery from this condition is accomplished by 
typing a ctl-C to reboot (this is the safest!), or a return, which simply 
ignores the bad sector in the file operation, Note, however, that typing a 
return may destroy your diskette integrity if the operation is a directory 
write, so make sure you have adequate backups in this case, 


The “SELECT” error occurs when there is an attempt to address a drive 
beyond the A through D range, In this case, the value of x in the error 
message gives the selected drive. The system reboots following any input from 
the console, 


The “READ ONLY" message occurs when there is an attempt to write to a 
diskette which has been designated as read-only in a STAT command, or has been 
set to read-only by the BDOS, In general, the operator should reboot CP/M 
either by using the warm start procedure (ctl-C) or by performing a cold start 
whenever the diskettes are changed. If a changed diskette is to be read but 
not written, BDOS allows the diskette to be changed without the warm or cold 
start, but internally marks the drive as read-only. The status of the drive 
is subsequently changed to read/write if a warm or cold start occurs. Upon 
issuing this message, CP/M waits for input from the console, An automatic 
warm start takes place following any input, 
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8. OPERATION OF CP/M ON THE MDS, 


This section gives operating procedures for using CP/M on the Intel MDS 
microcomputer development system. A basic knowledge of the MDS hardware and 
software systems is assumed, 


CP/M is initiated in essentially the same manner as Intel’s ISIS 
operating system, The disk drives are labelled @ through 3 on the MBS, 
corresponding to CP/M drives A through D, respectively, The CP/M system 
diskette is inserted into drive @, and the BOOT and RESET switches are 
depressed in sequence, The interrupt 2 light should go on at this point, The 
space bar is then depressed on the device which is to be taken as the system 
console, and the light should go out (if it does not, then check connections 
and baud rates). The BOOT switch is then turned off, and the CP/M signon 
message should appear at the selected console device, followed by the "A>" 
system prompt. The user can then issue the various resident and transient 
commands 


The CP/M system can be restarted (warm start) at any time by pushing the 
INT @ switch on the front panel, The built-in Intel ROM monitor can be 
initiated by pushing the INT 7 switch (which generates a RST 7), except when 
operating under DDI, in which case the DDI program gets control instead, 


Diskettes can be removed from the drives at any time, and the system can 
be shut down during operation without affecting data integrity. Note, 
however, that the user must not remove a diskette and replace it with another 
without rebooting the system (cold or warm start), unless the inserted 
diskette is "read only." 


Due to hardware hang-ups or malfunctions, CP/M may type the message 
BDOS ERR ON x: BAD SECTOR 


where x is the drive which has a permanent error, This error may occur when 
drive doors are opened and closed randomly, followed by disk operations, or 
may be due to a diskette, drive, or controller failure, The user can 
optionally elect to ignore the error by typing a single return at the 
console, The error may produce a bad data record, requiring re-initialization 
of up to 128 bytes of data, The operator can reboot the CP/M system and try 
the operation again, 


Termination of a CP/M session requires no special action, except that it 
is necessary to remove the diskettes before turning the power off, to avoid 
random transients which often make their way to the drive electronics, 


It should be noted that factory-fresh IBM-compatible diskettes should be 
used rather than diskettes which have previously been used with any ISIS 
version, In particular, the ISIS “FORMAT” operation produces non-standard 
sector numbering throughout the diskette, This non-standard numbering 
seriously degrades the performance of CP/M, and will operate noticeably slower 
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than the distribution version, If it becomes necessary to reformat a diskette 
(which should not be the case for standard diskettes), a program can be 
written under CP/M which causes the MDS 8@@ controller to reformat with 
sequential sector numbering (1-26) on each track. 
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Note: "MDS 800" and "ISIS" are registered trademarks of Intel Corporation. 
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1, INTRODUCTION, 


This manual describes CP/M, release 2, system organization 
including the structure of memory and system entry points. The 
intention is to provide the necessary information required to write 
programs which operate under CP/M, and which use the peripheral and 
disk I/O facilities of the system. 


CP/M is logically divided into four parts, called the Basic I/0 
System (BIOS), the Basic Disk Operating System (BDOS), the Console 
command processor (CCP), and the Transient Program Area (TPA). The 
BIOS is a hardware-dependent module which defines the exact low level 
interface to a particular computer system which is necessary for 
peripheral device I/0, Although a standard BIOS is supplied by 
Digital Research, explicit instructions are provided for field 
reconfiguration of the BIOS to match nearly any hardware environment 
(see the Digital Research manual entitled "CP/M Alteration Guide"). 
The BIOS and BDOS are logically combined into a single module with a 
common entry point, and referred to as the FDOS. The CCP is a 
distinct program which uses the FDOS to provide a human-oriented 
interface to the information which is cataloged on the backup storage 
device, The TPA is an area of memory (i.e., the portion which is not 
used by the FDOS and CCP) where various non-resident operating system 
commands and user programs are executed. The lower portion of memory 
is reserved for system information and is detailed later sections, 
Memory organization of the CP/M system in shown below: 


high | | 
memory | 
| FDOS (BDOS+BIOS) | 
FBASE: | | 
| | 
| CCP | 
CBASE: | | 
| 
| | 
| | 
| TPA | 
| | 
TBASE: | | 
| system parameters 
BOOT: | 


The exact memory addresses corresponding to BOOT, TBASE, CBASE, and 
FBASE vary from vérsion to version, and are described fully in the 
“CP/M Alteration Guide." All standard CP/M versions, however, assume 
BOOT = 9906H, which is the base of random access memory. The machine 
code found at location BOOT performs a system “warm start" which loads 
and initializes the programs and variables necessary to return control 
to the CCP. Thus, transient programs need only jump to location BOOT 
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to return control to CP/M at the command level. Further, the standard 
versions assume TBASE = BOOT+#190H which is normally location @190H. 
The principal entry point to the FDOS is at location BOOT+#9@5H 
(normally 90905H) where a jump to FBASE is found, The address field at 
BOOT+®@006H (normally 6006H) contains the value of FBASE and can be 
used to determine the size of available memory, assuming the CCP is 
being overlayed by a transient program, 


Transient programs are loaded into the TPA and executed as 
follows, The operator communicates with the CCP by typing command 
lines following each prompt. Each command line takes one of the 
forms: 


command 
command filel 
command filel file2 


where “command” is either a built-in function such as DIR or TYPE, or 
the name of a transient command or program, If the command is a 
built-in function of CP/M, it is executed immediately. Otherwise, the 
CCP searches the currently addressed disk for a file by the name 


command, COM 


If the file is found, it is assumed to be a memory image of a program 
which executes in the TPA, and thus implicitly originates at TBASE in 
memory. The CCP loads the COM file from the disk into memory starting 
at TBASE and possibly extending up to CBASE, 


If the command is followed by one or two file specifications, 
the CCP prepares one or _ two file control block (FCB) names in the 
system parameter area, These optional FCB's are in the form necessary 
to access files through the FDOS, and are described in the next 
section, 


The transient program receives control from the CCP and begins 
execution, perhaps using the I/O facilities of the FDOS. The 
transient program is “called” from the CCP, and thus can simply return 
to the CCP upon completion of its processing, or can jump to BOOT to 
pass control back to CP/M. In the first case, the transient program 
must not use memory above CBASE, while in the latter case, memory up 
through FBASE-1 is free, 


The transient program may use the CP/M I/O facilities to 
communicate with the operator's console and peripheral devices, 
including the disk subsystem. The I/O system is accessed by passing a 
“function number" and an “information address" to CP/M through the 
FDOS entry point at BOOT+#9O5H, In the case of a disk read, for 
example, the transient program sends the number corresponding to a 
disk read, along with the address of an FCB to the CP/M FDOS. The 
FDOS, in turn, performs the operation and returns with either a disk 
read completion indication or an error number indicating that the disk 
read was unsuccessful. The function numbers and error indicators are 
given in below, 
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2. OPERATING SYSTEM CALL CONVENTIONS, 


The purpose of this section is to provide detailed information 
for performing direct operating system calls from user programs. Many 
of the functions listed below, however, are more simply accessed 
through the I/O macro library provided with the MAC macro assembler, 
and listed in the Digital Research manual entitled "MAC Macro 
Assembler: Language Manual and Applications Guide.” 


CP/M facilities which are available for access by transient 
programs fall into two general categories: simple device I/O, and 
disk file I/O. The simple device operations include: 


Read a Console Character 

Write a Console Character 

Read a Sequential Tape Character 
Write a Sequential Tape Character 
Write a List Device Character 
Get or Set I/O Status 

Print Console Buffer 

Read Console Buffer 

Interrogate Console Ready 


The FDOS operations which perform disk Input/Output are 


Disk System Reset 

Drive Selection 

File Creation 

File Open 

File Close 

Directory Search 

File Delete 

File Rename 

Random or Sequential Read 
Random or Sequential Write 
Interrogate Available Disks 
Interrogate Selected Disk 
Set DMA Address 

Set/Reset File Indicators 


As mentioned above, access to the FDOS functions is accomplished 
by passing a function number and information address through the 
primary entry point at location BOOT+@@@5H,. In general, the function 
number is passed in register C with the information address in the 
double byte pair DE. Single byte values are returned in register A, 
with double byte values returned in HL (a zero value is returned when 
the function number is out of range). For reasons of compatibility, 
register A = L and register B = H upon return in all cases. Note that 
the register passing conventions of CP/M agree with those of Intel's 
PL/M systems programming language. The list of CP/M function numbers 
is given below, 
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6 System Reset 19 Delete File 

1 Console Input 28 Read Sequential 

2 Console Output 21 Write Sequential 

3 Reader Input 22 Make File 

4 Punch Output 23 Rename File 

5 List Output 24 Return Login Vector 

6 Direct Console I/O 25 Return Current Disk 

7 Get I/O Byte '26 Set DMA Address 

8 Set I/O Byte 27 Get Addr (Alloc) 

9 Print String 28 Write Protect Disk 
1@ Read Console Buffer 29 Get R/O Vector 
ll Get Console Status 38 Set File Attributes 
12 Return Version Number 31 Get Addr(Disk Parms) 
13 Reset Disk System 32 Set/Get User Code 
14 Select Disk 33 Read Random 
15 Open File 34 Write Random 
16 Close File 35 Compute File Size 
17 Search for First 36 Set Random Record 


18 Search for Next 


(Functions 28 and 32 should be avoided in application programs to 
maintain upward compatibility with MP/M.) 


Upon entry to a transient program, the CCP leaves the _ stack 
pointer set to an eight level stack area with the CCP. return address 
pushed onto the stack, leaving seven levels before overflow occurs, 
Although this stack is usually not used by a transient program (i.e., 
most transients return to the CCP though a jump to location 99080H), it 
is sufficiently large to make CP/M system calls since the FDOS 
Switches to a local stack at system entry. The following assembly 
language program segment, for example, reads characters continuously 
until an asterisk is encountered, at which time control returns to the 
CCP (assuming a standard CP/M system with BOOT = 98@0H): 


BDOS EQU 9005H :STANDARD CP/M ENTRY 
CONIN EQU 1 : sCONSOLE INPUT FUNCTION 
° a Vi 
¢ 
ORG 0190H © ;BASE OF TPA 
NEXTC: MVI C,CONIN! 4 ;READ NEXT CHARACTER 
CALL BDOS »RETURN CHARACTER IN <A> 
CPI tx! *END OF PROCESSING? 
JINZ NEXTC sLOOP IF NOT 
RET +RETURN TO CCP 
END 


CP/M implements a named file structure on each disk, providing a 
logical organization which allows any particular file to contain any 
number of records from completely empty, to the full capacity of the 
drive. Each drive is logically distinct with a disk directory and 
file data area, The disk file names are in three parts: the drive 
select code, the file name consisting of one to eight non-blank 
characters, and the file type consisting of zero to three non-blank 
characters. The file type names the generic category of a particular 
file, while the file name distinguishes individual files in each 
category. The file types listed below name a few generic categories 
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which have been established, although they are generally arbitrary: 


ASM Assembler Source PLI PL/I Source File 
PRN Printer Listing REL Relocatable Module 
HEX Hex Machine Code TEX TEX Formatter Source 


BAS Basic Source File BAK ED Source Backup 
INT Intermediate Code SYM SID Symbol File 
COM CCP Command File $$$ Temporary File 


Source files are treated as a sequence of ASCII characters, where each 
“line” of the source file is followed by a carriage-return line-feed 
sequence (@DH followed by OAH). Thus one 128 byte CP/M record could 
contain several lines of source text, The end of an ASCII file is 
denoted by a control-Z character (1AH) or a real end of file, returned 
by the CP/M read operation, Control-Z characters embedded within 
machine code files (e.g., COM files) are ignored, however, and the end 
of file condition returned by CP/M is used to terminate read 
operations, 


Files in CP/M can be thought of as a sequence of up to 65536 
records of 128 bytes each, numbered from @ through 65535, thus 
allowing a maximum of 8 megabytes per file. Note, however, that 
although the records may be considered logically contiguous, they may 
not be physically contiguous in the disk data area, Internally, all 
files are broken into 16K byte segments called logical extents, so 
that counters are easily maintained as 8-bit values, Although the 
decomposition into extents is discussed in the paragraphs which 
follow, they are of no particular consequence to the programmer’ since 
each extent is automatically accessed in both sequential and random 
access modes, 


In the file operations starting with function number 15, DE 
usually addresses a file control block (FCB). Transient programs 
often use the default file control block area reserved by CP/M at 
location BOOT+#@5CH (normally @@5CH) for simple file operations, The 
basic unit of file information is a 128 byte record used for all file 
operations, thus a default location for disk I/O is provided by CP/M 
at location BOOT+@@8@0H (normally @08@0H) which is the initial default 
DMA address (see function 26). All directory operations take place in 
a reserved area which does not affect write buffers as was the case in 
release 1, with the exception of Search First and Search Next, where 
compatibility is required, 


The File Control Block (FCB) data area consists of a sequence of 
33 bytes for sequential access and a series of 36 bytes in the case 
that the file is accessed randomly. The default file control block 
normally located at ®@@5CH can be used for random access files, since 
the three bytes starting at BOOT+@@7DH are available for this purpose, 
The FCB format is shown with the following fields: 
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0@ @1 @2 ... 68 6919111213141516... 31 32 33 34 35 
where 


dr drive code (@ - 16) 
@ => use default drive for file 


1 => auto disk select drive A, 
2 => auto disk select drive B, 


eee 


16=> auto disk select drive P. 


£1...£8 contain the file name in ASCII 
upper case, with high bit = 6 


tl,t2,t3 contain the file type in ASCII 
upper case, with high bit = @ 
tl’, t2', and t3‘' denote the 
bit of these positions, 


tl* = 1 => Read/Only file, 
t2' = 1 => SYS file, no DIR list 
ex contains the current extent number, 


normally set to @9 by the user, but 
in range @ - 31 during file I/O 


sl reserved for internal system use 


$2 reserved for internal system use, set 
to zero on call to OPEN, MAKE, SEARCH 


re record count for extent "ex," 
takes on values from 8 - 128 


d@...dn filled-in by CP/M, reserved for 
system use ete 


note 
cr current record to read or write in 


a sequential file operation, normally 
set to zero by user 


r@,rl1,r2 optional random record number in the 
range §@-65535, with overflow to r2, 
r@,rl constitute a 16-bit value with 
low byte r@, and high byte rl 


Each file being accessed through CP/M must have a_ corresponding 
FCB which provides the name and allocation information for all 
subsequent file operations, When accessing files, it is the 
programmer's responsibility to fill the lower sixteen bytes of the FCB 
and initialize the "cr" field. Normally, bytes 1 through 11 are set 
to the ASCII character values for the file name and file type, while 
all other fields are zero. 
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FCB's are stored ina directory area of the disk, and are 
brought into central memory before proceeding with file operations 
(see the OPEN and MAKE functions). The memory copy of the FCB is 
updated as file operations take place and later recorded permanently 
on disk at the termination of the file operation (see the CLOSE 
command) , 


The CCP constructs the first sixteen bytes of two optional FCB’s 
for a transient by scanning the remainder of the line following the 
transient name, denoted by "“filel" and "“file2" in the prototype 
command line described above, with unspecified fields set to ASCII 
blanks. The first FCB is constructed at location BOOT+@@5CH, and can 
be used as-is for subsequent file operations, The second FCB occupies 
the d@ ... dn portion of the first FCB, and must be moved to another 
area Of memory before use, If, for example, the operator types 


PROGNAME B:X.ZOT Y,ZAP 


the file PROGNAME.COM is loaded into the TPA, and the default FCB at 
BOOT+®#85CH is initialized to drive code 2, file name "X" and file type 
"ZOT", The second drive code takes the default value @, which is 
placed at BOOT+@®6CH, with the file name "“y" placed into location 
BOOT+@96DH and file type "ZAP" located 8 bytes later at BOOT+6075H. 
All remaining fields through “cr” are set to zero, Note again that it 
is the programmer's responsibility to move this second file name and 
type to another area, usually a separate file control block, before 
opening the file which begins at BOOT+@@5CH, dué to the fact that the 
open operation will overwrite the second name and type. 


If no file names are specified in the original command, then the 
fields beginning at BOOT+@@5DH and BOOT+0@6DH contain blanks. In all 
cases, the CCP translates lower case alphabetics to upper case to be 
consistent with the CP/M file naming conventions, 


As an added convenience, the default buffer area at location 
BOOT+@980H is initialized to the compand line tail typed by the 
operator following the program name. Thé first position contains the 
number of characters, with the characters themselves following the 
character count. Given the above command line, the area beginning at 
BOOT+868@H is initialized as follows: 


BOOT+9080H: 
+06 +01 +02 +63 +04 +05 +66 +07 +08 +09 +19 +11 +12 +13 +14 
1 4 iT) o ab B oe " : iy i) X u 1“ i. i) t Z 16 iT) @) “ w T u it) te ii) Y i u a te uw Z ity "A u uw Pp iD 


where the characters are translated to upper case ASCII with 
uninitialized memory following the last valid character, Again, it is 


the responsibility of the programmer to extract the information from 
this buffer before any file operations are performed, unless the 
default DMA address is explicitly changed, 


The individual functions are described in detail in the pages 
which follow. 


(All Information Contained Herein is Proprietary to Digital Research.) 
7 


RREKKKKKKKKKEKEKKEKKKEEKKKKKKKKKKKKKKKKREKE 


* * 
* FUNCTION 0: System Reset * 
* * 
REKKKEKKEKKKKKKKKKKKKKKKKKKKKRKKKKKKKRKRKKKEE 
* Entry Parameters: . 

Register C: OOH = 


RHEKKKKKKKKEKKEKKEKKKKEKKKEKKKEKKKKEKKKKKKKEE 


The system reset function returns control to the CP/M operating 
system at the CCP level. The CCP re-initializes the disk subsystem by 
selecting and logging-in disk drive A. This function has exactly the 
same effect as a jump to location BOOT, 


KREKKEKKKKKKKKKKEKKKKKEKKEKKEKEKEKKEKKKKEKKKKEKK 


* * 
* FUNCTION 1: CONSOLE INPUT * 
* * 
REKEKKKEKKEKKKKKKEEKKKEKEKEKEKKEKEKKEKKKKEKKKKKKKE 
* Entry Parameters: * 
* Register C: 61H 4 
* * 
* Returned Value: . 
* Register A: ASCII Character * 
KRHEKEKKKKEKKEKKEKKKKKKEKKEKKEKKKKKKKKKKKKKKKEKK 


The console input function reads the next console character to 
register A, Graphic characters, along with carriage return, line 
feed, and backspace (ctl-H) are echoed to the console, Tab characters 
(ctl-I) are expanded in columns of eight characters, A check is made 
for start/stop scroll (ctl-S) and start/stop printer echo (ctl-P). 
The FDOS does not return to the calling program until a character has 
been typed, thus suspending execution if a character is not ready. 


RRKEKKEKKKKEKKKKKKKKEKKKKEKKKKKKKEKKEKKKKKKKEKE 


* * 
* FUNCTION 2: CONSOLE OUTPUT * 
* * 
KRRKKKKEKKKEKKEKEKKEKKKKEKKEKEKEKEKEKKKKKKKKKEKKKKEKE 
* Entry Parameters: " 
- Register C: 62H = 
x Register E: ASCII Character * 
* * 


KRREKKEKKEKKEKKKKKEKEKEKEKKKKKKKKKKEKKKKEKKEKKKKEKEK 


The ASCII character from register E is sent to the console 
device, Similar to function 1, tabs are expanded and checks are made 
for start/stop scroll and printer echo. 
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bi 


REKKEKKEKKKEKEKEKEKRKEEKREKEKEKRERKEKEKKEEKREEKKEKKE 


* ¥ * 
* FUNCTION 3: READER INPUT * 
k * 
@ KREKKEKEKKEKEKKEKEKEKKEKEEREKREEKKKKEEKKEKKRKKKKKE 
* Entry Parameters: a) 
* Register C: 63H * 
*k * 
* Returned Value: bs 
* Register A: ASCII Character * 
RKEKKKKEKKKKEKEKKKEKKKEEKEKKEKEKKEKKEKEEKKEKKEEKKE 


The Reader Input function reads the next character from the 
logical reader into register A (see the IOBYTE definition in the "CP/M 
Alteration Guide"), Control does not return until the character has 
been read, 


KRREEKKEKEKKKEKEKEKEREKEKKREREKEKKKRKRKRKKKKER 


* * 
* FUNCTION 4: PUNCH OUTPUT * 
* * 
KRREKKERKKKKKEKEKRKEERERRKKKEKEREKERKKKRRKKERKEK 
* Entry Parameters: “ 
* Register C: 64H * 
x Register E: ASCII Character * 
* * 


KR KR KRKEIRRKKKEKKKKRERK RR E RRR KREKEREKK 


@ The Punch Output function sends the character from register E to 
the logical punch device, 


RREKRKEKEKREKRKKEKEKEKKKKEEKEEKKEKKEKKRKKKKKKRKKKE 


* * 
* FUNCTION 5: LIST OUTPUT * 
k ke tke 
KRRKEKKKKKRERKREKKKREKKKEKERKKEKKKKRRRKRKKK 
* Entry Parameters: . 
* Register C: 95H * 
* Register E: ASCII Character * 
* * 


KRREEKKKKEKKEKKEKEKEKKEEKEKKEKEKEKKEKKEKKKKRKK KEKE 


The List Output function sends the ASCII character in register E 
to the logical listing device, 
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) 


REEKKEKKEKEKEKEKRKEKEKEKKEKEKRKEKRKEKKEKKKKKKKRKKRKKKKKESK 
* * 


* FUNCTION 6: DIRECT CONSOLE I/O * 
* * 


KREEKEKKKKKEKEKRKEKEKKEKEKKEKEKEKKKKKKKKKKKKKKKKKE 


Entry Parameters: 
Register C: 66H 
Register E: Q@FFH (input) or 
char (output) 


Returned Value: 


Register A: char or status 
(no value) 
KREKEKKKKKKEKKEKKEKKEKEKRERKEEKKEKKKKKRKKKKKKEK 


+ ee + t+ HF F 


* 
* 
* 
* 
* 
* 
* 
* 
* 


Direct console I/O is supported under CP/M for those specialized 
applications where unadorned console input and output is’ required, 
Use of this function should, in general, be avoided since it bypasses 
all of CP/M's normal control character functions (e.g., control-S and 
control-P), Programs which perform direct I/O through the BIOS under 
previous releases of CP/M, however, should be changed to use direct 
I/O under BDOS so that they can be fully supported under future 
releases of MP/M and CP/M. 


Upon entry to function 6, register E either contains hexadecimal 
FF, denoting a console input request, or register E contains an ASCII 
character, If the input value is FF, then function 6 returns A = 08 
if no character is ready, otherwise A contains the next console input 
character, 


If the input value in E is not FF, then function 6 assumes’ that 
E contains a valid ASCII character which is sent to the console, 
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REKKKKKKEKKEKEKREEKEKRKEKKEKRKEKREKEKKKKEKKRKEKKKRKKEKKE 


* * 
* FUNCTION 7: GET I/O BYTE * 
* * 
o KRHAEKKKKEKKEKKEKEKEREKRKRKEKEKEKKKKEKEKKEKRKEKKKEKRKEKKEKE 
* Entry Parameters: * 
wl Register C: 7H * 
* * 
* Returned Value: - 
- Register A: I/0 Byte Value * 
KRKKKKKKEKKKKEKEKKEKEKKEKKEKEKEKKEKEKRKKKEKKKKKEEK 


The Get I/O Byte function returns the current value of IOBYTE in 
register A. See the “CP/M Alteration Guide" for IOBYTE definition. 


RREKKEKKEKKEKRKEKKEKKKKKKEKKKKKKKKKKKKKKKKKKKKER 


* * 
* FUNCTION 8: SET I/O BYTE * 
* * 
KRREKKEKEKKKKEKKKEKKKEKEKKEKKKKKKKKKKKKRKKRKKRKKER 
* Entry Parameters: * 
* Register C: 68H 6 
* Register E: I/0 Byte Value * 
* * 


KHEKKEKKEKKEKKKKKEKKEKKEKKEKKKEKKKEKKKEKKKKKKKEKK 


The Set I/O Byte function changes the system IOBYTE value to 
ra that given in register E, 


RREKKKEKEKKEKEKEKKKEKEKKKEKKEKKEKKEKKEKKKKKKKKKKKKK 


* * 
* FUNCTION 9: PRINT STRING * 
x * 
KRRKKKKKKEKKEKEKEKEKKKEKKKKKKEKRKKKKKKKKKKKKKE 
* Entry Parameters: * 
= Register C: 69H * 
* Registers DE: String Address * 
* * 


KRREKKKKEKKKEKEKKEKKEKEKKKKEEKKEKKKEKKKKKKKKKEKE 


The Print String function sends the character string stored in 
memory at the location given by DE to the console device, until a “$" 
is encountered in the string, Tabs are expanded as in function 2, and 
checks are made for start/stop scroll and printer echo. 
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RREKKEKEKEEKKEKEEKEKKEKEKEEKEKEKKREKREKERER 
* * 
* FUNCTION 18: READ CONSOLE BUFFER * 
* * 
RKKEKEKKEKKKKKEKEKK KEKE KERR EERE RRR REE 
* Entry Parameters: 

Register C: OAH ; 

Registers DE: Buffer Address 


Console Characters in Buffer 


* 
* 
* 
* 
* 
* 
KRREEKKKEKKKEKKEEKKEKREREKKEKEKKEKREKKKKKKKKRKK 


* 
* 
* 
* Returned Value: 
& 
* 


The Read Buffer function reads a line of edited console input 
into a buffer addressed by registers DE, Console input is terminated 


when either the input buffer overflows. The Read Buffer takes’ the 
form: 


DE: +@ +1 +2 +3 +4 +5 +6 +7 +8 eo 8 +n 


ee ee ee ee es ee ae ese ee ee ee eee ee ee ee ae a ee GS ee ee ED Se ne em eS a OS CUD OE UD CEE mS Oe on ee oe 


where "mx" is the maximum number of characters which the buffer will 
hold (1 to 255), “nc” is the number of characters read (set by FDOS 
upon return), followed by the characters read from the console. if ne 
< mx, then uninitialized positions follow the last character, denoted 
by "??" in the above figure, A number of control functions are 
recognized during line editing: 


rub/del removes and echoes the last character 
ctl-C reboots when at the beginning of line 
ctl-E causes physical end of line 

ctl-H backspaces. one character position 

ctl-J (line feed) ‘terminates input line 

ctl-M (return) t®#thinates input line 

ctl-R retypes t Gurrent line after new line 
ctl-U removes currnt line after new line 
ctl-X backspaces to beginning of current line 


Note also that certain functions which return the carriage to the 
leftmost position (e.g., ctl-X) do so only to the column position 
where the prompt ended (in earlier releases, the carriage returned to 


the extreme left margin). This convention makes operator data input 
and line correction more legible, 
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KRREKKKKRKKKKEKRKEEEKEKEEKRKKKEEEKKKKKKEKKKKKEKEE 


x & 
* FUNCTION 11: GET CONSOLE STATUS * 
* * 


KRKEKKEKKEKEKEKEEKEKEKEKEKKEEKRKEKKKKEKRKKRKKKKKKKKEKE 


* Entry Parameters: * 
Register C: OBH 


* * 
* * 
* Returned Value: * 
* Register A: Console Status * 
RREKKKKEEKEKEKEKKKKEKEKKEEKRKEKEKREEKEKKKKKKEKKKEE 


The Console Status function checks to see if a character has 
been typed at the console, If a character is ready, the value @FFH is 
returned in register A. Otherwise a 0@H value is returned, 


KKKKRKRKRE RRR REE EREREKREKRKEEKKEKRK KKK 
* & 
* FUNCTION 12: RETURN VERSION NUMBER * 
* * 


KRREKKKKEKRKEKEKKERKKKEKKKKKKKKKKKKKKKKKKKKKE 


* Entry Parameters: * 
- Register C: OCH * 
x * 
* Returned Value: * 
- Registers HL: Version Number * 
KRREKKKKEEKEKEKKKEEEREKEEKRKREKKKEKKEKKEKKKKKKKK 
Function 12 provides information which allows’ version 
independent programming. A two-byte value is returned, with H = 88 


designating the CP/M release (H = @1 for MP/M), and L = 6@ for all 
releases previous to 2.6, CP/M 2.@ returns a hexadecimal 208 in 
register L, with subsequent version 2 releases in the hexadecimal 
range 21, 22, through 2F. Using function 12, for example, you can 
write application programs which provide both sequential and random 
access functions, with ‘random access disabled when operating under 
early releases of CP/M. 117 
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KRRKKKEKEKEKEEEREKKEEKEKREKKEKREKRERKERKEKRREK 


* * 
* FUNCTION 13: RESET DISK SYSTEM * 
TREKKA AERARWEWAWR EER WORE ERLE NRE 
* Entry Parameters: . * 
* Register C: @DH m 
*k * 


RREKKKEKKEEKEKKEKKEKEEKEKRKKKEKKEKKEKRKKKKKKKEKE 


The Reset Disk Function is used to programmatically restore the 
file system to a reset state where all disks are set to read/write 
(see functions 28 and 29), only disk drive A is selected, and the 
default DMA address is reset to BOOT+#98@H,. This function can be 
used, for example, by an application program which requires a disk 
change without a system reboot, 


REKKKEKKEKEKKEKKEREKRKEEKEEKREKRERERKKKEKKKEE 


x * 
* FUNCTION 14: SELECT DISK * 
* * 
KRRKKKEKEKEEKKEKEKEEKEEEKEKKEKERKEKEKEKKKKKEKKKKEEEK 
* Entry Parameters: * 
= Register C: MEH * 
* Register E: Selected Disk * 
* * 


KREKKKKEKKEKKKKKEKKEKEKEKKKREKREKRKEEKRKEKKEKKKEKK 


The Select Disk function designates the disk drive named in 
register E as the default disk for subsequent file operations, with E 
= @ for drive A, 1 for drive B, and so-forth through 15 corresponding 
to drive P ina full sixteen drive system. The drive is placed in an 
“on-line” status which, in particular, activates its directory until 
the next cold start, warm start, or disk system reset operation, If 
the disk media is changed while it is on-line, the drive automatically 
goes to a read/only status in a standard CP/M environment (see 
function 28). FCB's which specify drive code zero (dr = §9H) 
automatically reference the currently selected default drive. Drive 
code values between 1 and 16, however, ignore the selected default 
drive and directly reference drives A through P, 


(All Information Contained Herein is Proprietary to Digital Research.) 
14 


RREKEEEKERKEEEEKAKKEEKEREKREKEEEEEREKRERERE 
* * 


* FUNCTION 15: OPEN FILE : 
* 


RRKKKEKKKKEKEKEEKEEEREREKKEEKEKEREKEEKRKEKEEER 


Entry Parameters: 
Register C: FH 
Registers DE: .FCB Address 


Returned Value: 


Register A: Directory Code 


* 
* 
* 
* 
* 
*® 
KRHEEKKEEKRKEKKEEREKEREEKEREKEKKEEEEKREKKKEKEK 


* 
* 
* 
* 
* 
* 
* 


The Open File operation is used to activate a file which 
currently exists in the disk directory for the currently active user 
number, The FDOS scans the referenced disk directory for a match in 
positions 1 through 14 of the FCB referenced by DE (byte sil is 
automatically zeroed), where an ASCII guestion mark (3FH) matches any 
directory character in any of these positions, Normally, no question 
Marks are included and, further, bytes "ex" and “s2" of the FCB are 
zero. 


If a directory element is matched, the relevant directory 
information is copied into bytes d@ through dn of the FCB, thus 
allowing access to the files through subsequent read and write 
operations. Note that an existing file must not be accessed until a 
sucessful open operation is completed. Upon return, the open function 
returns a “directory code" with the value @ through 3 if the open was 
successful, or OFFH (255 decimal) if the file carinot be found, If 
question marks occur in the FCB then the first matching FCB is 
activated, Note that the current record ("cr") must be zeroed by the 
program if the file is to be accessed sequentially from the first 
record, 
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RREEKKKKKEKKEKRKEKEEKEKKEKKERKKKKEKKKKKKKKKKKRKE 


* * 
* FUNCTION 16: CLOSE FILE = 
* * 
KRREKEKKKKKEKKEKKKKEKREEKKEKKEEKKKKEKKKRKKKKEKK 
* Entry Parameters: ™ 
* Register C: 10H ® 
* Registers DE: FCB Address * 
* * 
* Returned Value: * 
* Register A: Directory Code * 
KREKKKEKKEKEKKKEKKKEKEKKEKKEKEKKEEKKEKKKKKKKRKKKKKKE 


The Close File function performs the inverse of the open file 
function, Given that the FCB addressed by DE has been previously 
activated through an open or make function (see functions 15 and 22), 
the close function permanently records the new FCB in the referenced 
disk directory. The FCB matching process for the close is identical 
to the open function. The directory code returned for a successful 
close operation is 9, 1, 2, or 3, while a OFFH (255 decimal) is 
returned if the file name cannot be found in the directory. A file 
need not be closed if only read operations have taken place, If write 
operations have occurred, however, the close operation is necessary to 
permanently record the new directory information, 
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KREKKKEKKKEKKKEKKE KEKE KEKE KRKREKEREREKERRKREE 
* * 


* FUNCTION 17: SEARCH FOR FIRST 3 
* 


HRKEKKKKKKKEKEKEKRKEKRE RE RE RERERRREREERRERERKE 
Entry Parameters: 
Register C: 11H 
Registers DE: FCB Address 


++ ++ YH F 


Returned Value: 


Register A: Directory Code 
REKEKKKKEKEKKREKREEKKKEKKERREREKKKEREKKEEE 


* 
* 
* 
* 
* 
* 
* 

Search First scans the directory for a match with the file given 
by the FCB addressed by DE. The value 255 (hexadecimal FF) is 
returned if the file is not found, otherwise 9, 1, 2, or 3 is returned 
indicating the file is present, In the case that the file is found, 
the current DMA address is filled with the record containing the 
directory entry, and the relative starting position is A * 32 (i.e., 
rotate the A register left 5 bits, or ADD A five times). Although not 
normally required for application programs, the directory information 
can be extracted from the buffer at this position, 

An ASCII question mark (63 decimal, 3F hexadecimal) in any 
position from "fl" through "ex" matches the corresponding field of any 
directory entry on the default or auto-selected disk drive. If the 
“dr" field contains an ASCII question mark, then the auto disk select 
function is disabled, the default disk is searched, with the search 
function returning any matched entry, allocated or free, belonging to 
any user number, This latter function is not normally used by 
application programs, but does allow complete flexibility to scan all 
current directory values. If the "dr" field is not a question mark, 
the "s2" byte is automatically zeroed. 


KRHREKKKEKKEKEKKKEKEKKEKRKEEKKEEERKEKKKKEKEKKEKE 


* * 
* FUNCTION 18: SEARCH FOR NEXT * 
* * 
KRHRKKRKEKKKKEEREKREKEKKKEKEKERKEKKEERKRKKKKREEE 
* Entry Parameters: ig 
; Register C: 12H “i 
* Returned Value: * 
* Register A: Directory Code * 
KHAKKAKKKKKKKKEKKRKEKEAKEKEKEEKKKEKKRKEKKKKRKRKRKK 


The Search Next function is similar to the Search First 
function, except that the directory scan continues from the last 
matched entry. Similar to function 17, function 18 returns’ the 
decimal value 255 in A when no more directory items match, 
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KRAEKKKKKKKKKEKKEKEEKRKEKREKEKEKEKEKKKKKEKKEKKKEKE 


* * 
* FUNCTION 19: DELETE FILE * 
* * 
REKKKEKKEKEKEKRKEKEKEKEKEKEKEKEKKKEKKKKKKKKEKK 
* Entry Parameters: " 


Register Ce 138 
Registers DE: FCB Address 


Register A: Directory Code 


* 
* 
* 
* 
* 
REKKEKEKKKKKKEKKKKKKKEKKEKEKEKKEKEKKEKKEKKKKEE 


* 
k 
* 
: Returned Value: 
* 


The Delete File function removes files which match the FCB 
addressed by DE, The filename and type may contain ambiguous 
references (i.e., question marks in various positions), but the drive 
select code cannot be ambiguous, as in the Search and Search Next 
functions, 


Function 19 returns a decimal 255 if the referenced file or 


files cannot be found, otherwise a value in the range @ to 3 is 
returned, 


KRREKKKKKEKKKEKKEKKEKKKEKKEKKKKKKKEKKKKKRKKKEER 


* * 
* FUNCTION 26: READ SEQUENTIAL : 
* 


KRREKKKEKEKKEKKEKEKEKKKEKKEKKEKEKKKKEKKKKKEKKEKKKEE 
* Entry Parameters: 


Register C: 14H 
Registers DE: FCB Address 


* 
* * 
x * 
* * 
* Returned Value: * 
x * 
* * 


Register A: Directory Code 
KRKEKEKKEKKEKKEKKEKEKREKKKEKKEKEKKKKKEKKEKKKKKKKEKE 


Given that the FCB addressed by DE has been activated through an 
open or make function (numbers 15 and 22), the Read Sequential 
function reads the next 128 byte record from the file into memory at 
the current DMA address, the record is read from position "cr" of the 
extent, and the "cr" field is automatically incremented to the next 
record position, If the “cr" field overflows then the next logical 
extent is automatically opened and the "cr" field is reset to zero in 
preparation for the next read operation, The value @@H is returned in 
the A register if the read operation was successful, while a non-zero 
value is returned if no data exists at the next record position (e.g., 
end of file occurs). 
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KRRKKKEKKKEKKEKKKKKKKKKKKKKEKKKKKKKKKKKEKKEKEK 
* * 
* FUNCTION 21: WRITE SEQUENTIAL : 
* 
KHEKKKKKKKKEKEKEKKKEKKKKKRKKKKKKKKKRKKKKKKKE 
* Entry Parameters: 

Register Cz: 158 
Registers DE: FCB Address 


Returned Value: 


Register A: Directory Code 


* 
* 
* 
* 
* 
KRRKEKKKEKEKKEKKEEKKEEKEKEKKEKEKEREKKEKEKKKEKKEKKEKKKK 


* 
* 
* 
* 
* 
* 
* 


Given that the FCb addressed by DE has been activated through an 
open or make function (numbers 15 and 22), the Write Seguential 
function writes the 128 byte data record at the current DMA address to 
the file named by the FCB, the record is placed at position "cr" of 
the file, and the "“cr“ field is automatically incremented to the next 
record position, If the “cr” field overflows then the next logical 
extent is automatically opened and the “cr” field is reset to zero in 
preparation for the next write operation. Write operations can take 
place into an existing file, in which case newly written records 
overlay those which already exist in the file. Register A = @@H upon 
return from a successful write operation, while a non-zero value 
indicates an unsuccessful write due to a full disk. 


HHKKKKEKEKKEKEKEKKKKKEKEKEKKEKKKKKKKKKKKKEKE 


* * 
* FUNCTION 22: MAKE FILE i 
x * 
KHEKKKEKKEKKEKKEKKEKKKEKKKEKEKKEKKKEKKKKKKEKKKEE 
* Entry Parameters: * 
* Register C: 16H % 
= Registers DE: FCB Address = 
* * 
* Returned Value: - 
* Register A: Directory Code * 
KRKKEKEKKEKRKREKRKEKKKEEKKKEKRKEKKKEKKKKKKKKKKKKKKKEE 


The Make File operation is similar to the open file operation 
except that the FCB must name a file which does not exist in the 
currently referenced disk directory (i.e., the one named explicitly by 
a non-zero "dr" code, or the default disk if “dr" is zero). The FDOS 
creates the file and initializes both the directory and main memory 
value to an empty file. The programmer must ensure that no duplicate 
file names occur, anda preceding delete operation is sufficient if 
there is any possibility of duplication. Upon return, register A = @, 
1, 2, or 3 if the operation was successful and OFFH (255 decimal) if 
no more directory space is available, The make function has the 
side-effect of activating the FCB and thus a subsequent open is not 
necessary. 
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RKRKERKEKKEKEKREKREKRKEKEKKKKEKEKKKRKEKKKRKRKKKKKKK 


* * 
* FUNCTION 23: RENAME FILE * 
* * 
RRKKEKKEKEKKEEKKRKEEKRKEKKRKERKEKKKKKKKR KEKE 
* Entry Parameters: * 
* Register C: 17H - 
* Registers DE: FCB Address * 
* * 
* Returned Value: * 
* Register A: Directory Code * 
RREKKKEKKKKEKKKEKKKEKKKEKEKKEEKREKERKKKEKKKRKRKKRKE 


The Rename function uses the FCB addressed by DE to change all 
occurrences of the file named in the first 16 bytes to the file named 
in the second 16 bytes. The drive code "dr" at position @ is used to 
select the drive, while the drive code for the new file name at 
position 16 of the FCB is assumed to be zero. Upon return, register A 
is set to a value between ®@ and 3 if the rename was successful, and 
®@FFH (255 decimal) if the first file name could not be found in the 
directory scan, 


KRKKKEKKKEREKEKEKKRE KKK KKK RK EKK EKER ERREKE 


x * 
* FUNCTION 24: RETURN LOGIN VECTOR * 
k k 
KRRKKEKEKKKEKKEKRKEKKKKKEKEKEKKEKRKEEKKKKKKKKRKKREK 
* Entry Parameters: = 
* Register C: 18H = 
* * 
- Returned Value: * 
* Registers HL: Login Vector * 
RAKE KKKHKEKKEKKKEKKEEKREEKRKEKKKRKKEREKKKKKKEE 


The login vector value returned by CP/M is a 16-bit value in HL, 
where the least significant bit of L corresponds to the first drive A, 
and the high order bit of H corresponds to the sixteenth drive, 
labelled P. A "O" bit indicates that the drive is not on-line, while 
a “1" bit marks an drive that is actively on-line due to an explicit 
disk drive selection, or an implicit drive select caused by a file 
operation which specified a non-zero "“dr" field. Note that 
compatibility is maintained with earlier releases, since registers A 
and L contain the same values upon return, 
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REKRKKEKKKKKKEKKKEKKEEKKEREKKEKEKKEKEKKKKKKEKKEE 


* * 
* FUNCTION 25: RETURN CURRENT DISK * 
* *k 
KRREKKKKKKKKEKKEKKEEKEKEKREKKEEEEKEKKKKRKKKKE 
* Entry Parameters: * 
* Register Cs: 198 * 
* * 
* Returned Value: i 
= Register A: Current Disk * 
REKKKKKKKKKKKKKRKKRKKKRKRKKKKKKKKRKKKKEKKKKKEK 


; Function 25 returns the currently selected default disk number 
in register A, The disk numbers range from @ through 15 corresponding 
to drives A through P. 


KRKEKKKKKKKEKEKEEEEKEEKEKEKREKREREKREKKEKKEKKEKKKEKE 


* * 
* FUNCTION 26: SET DMA ADDRESS * 
* * 
REKEKKKKKKKKKKKKKKKKKKKKRKKKKKKKKKKKKKEKREE 
* Entry Parameters: 1 
* Register C: 1AH 7 
* Registers DE: DMA Address * 
* * 


RKREKKKEKRKEKEKEKEKEKEKEKKKEKKKEKKKKKKKKKKKKKKE 


"DMA" is an acronym for Direct Memory Address, which is often 
used in connection with disk controllers which directly access the 
memory of the mainframe computer to transfer data to and from the disk 
subsystem. Although many computer systems use non-DMA access (i.e., 
the data is transfered through programmed I/O operations), the DMA 
address has, in CP/M, come to mean the address at which the 128 byte 
data record resides before a disk write and after a disk read. Upon 
cold start, warm start, or disk system reset, the DMA address is 
automatically set to BOOT+@@80H. The Set DMA function, however, can 
be used to change this default value to address another area of memory 
where the data records reside. Thus, the DMA address becomes’ the 
value specified by DE until it is changed by a subsequent Set DMA 
function, cold start, warm start, or disk system reset, 
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KEKKKKKKEKKKEKKEEEREKREKKEEKKEERKEKKKRREKRRKKK 


k * 
* FUNCTION 27: GET ADDR(ALLOC) * 
* * 
RREKKKKEKKEKEKKKKEKKEKKEKREEKREKKREKRKERREEKREEKKEKE 
* Entry Parameters: - 
e Register C: 1BH * 
* * 
* Returned Value: * 
* Registers HL: ALLOC Address * 
REREKKEKEKEKKEKKKKEKEKKKKKKRKEKKKEKKKKEKRKKKKE 


An "allocation vector" is maintained in main memory for each 
on-line disk drive, Various system programs use the information 
provided by the allocation vector to determine the amount of remaining 
storage (see the STAT program). Function 27 returns the base address 
of the allocation vector for the currently selected disk drive. The 
allocation information may, however, be invalid if the selected disk 
has been marked read/only. Although this function is not normally 
used by application programs, additional details of the allocation 
vector are found in the "CP/M Alteration Guide." 


KREKKKEKEKREKREKKEKKEKKKEKEKEKKEEKREKRKEEKEKKKRKKEKK 
* * 


* FUNCTION 28: WRITE PROTECT DISK : 
* 


KRRKEAKKKEKKEKEKEKKKEKEKKKEKKEKEKEKEKKKEKRERKKKKE 


* Entry Parameters: * 
* Register C: 1CH by 
* * 


REEKKKKKKEKEKEKKKERKEKERKKKKREEKKREKREKKEKKEKKKE 


The disk write protect function provides tempordry write 
protection for the currently selected disk. Any attempt to write to 
the disk, before the next cold or warm start operation produces the 


message 


Bdos Err on d: R/O 
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RRKKEKKKKEKEKKREKRERERKEEEKREKEKKEKEEREKEKKREKK 
* k 


* FUNCTION 29: GET READ/ONLY VECTOR * 
* * 


KRREKKEKEKKKEKEKKKKKEKEKERRKKEKKKEKEKKRKKEKEEREKRKEKE 


* Entry Parameters; * 
* Register C: 1DH * 
* * 
* Returned Value: * 
* Registers HL: R/O Vector Value* 
KRREEKEKKKEKEKKKKKEEKKKKEKRERKKEKKRKKKKKKKKRKRKRKRKREK 


Function 29 returns a bit vector in register pair HL which 
indicates drives which have the temporary read/only bit set. Similar 
to function 24, the least significant bit corresponds to drive A, 
while the most significant bit corresponds to drive P. The R/O bit is 
set either by an explicit call to function 28, or by the automatic 
software mechanisms within CP/M which detect changed disks, 


RREKKKKKKEKEKKKEKKEKEREKREKKKEKRAERERKEKREKRKEKER 
* * 


* FUNCTION 38: SET FILE ATTRIBUTES * 
* * 


RREKEKKEKKKKEKKEEKKEKEKEKRKEKKRERKEKKEKKKKKKRKRKKKK 


* Entry Parameters: * 
* Register C: 1EH * 
* Registers DE: FCB Address % 
* * 
* Returned Value: “ 
* Register A: Directory Code * ' 
RKEKEKKEKEKKKKEEKKEKKKKKKKEKKKKRKEKRKKKKKKKRRKEKE 

The Set File Attributes function allows programmatic 
Manipulation of permanent indicators attached to files. In 
particular, the R/O and System attributes (tl' and t2') can be set or 
reset, The DE pair addresses an unambiguous file name with the 
appropriate attributes set or reset, Function 38 searches for a 
match, and changes the matched directory entry to contain the selected 
indicators, Indicators f1l' through £4’ are not presently used, but 


may be useful for applications programs, since they are not involved 
in the matching process during file open and close operations. 


Indicators £5' through £8’ and t3' are reserved for future system 
expansion, 
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KHKKKKKKKEKEKKKEKKKKKKEK KKK KKK KKK KR KKK 
* * 
* FUNCTION 31: GET ADDR(DISK PARMS) * 
* * 
KKK KKK KKK RRR KKK KK RK KEKE KKK KKK KEK KKK KKK 


* Entry Parameters: * 
* Register C: 1FH = 
* * 
* Returned Value: * 
* * 
* * 


Registers HL: DPB Address 
REKKKKEKKEKKEKKEKKEKKKKKKKKKKKKKKKKKKRKKEK 


The address of the BIOS resident disk parameter block is 
returned in HL as a result of this function call. This address can be 
used for either of two purposes, First, the disk parameter values can 
be extracted for display and space computation purposes, or transient 
programs can dynamically change the values of current disk parameters 
when the disk environment changes, if required. Normally, application 
programs will not require this facility. 


RREKKKKEKKKEKEKKEKKEKKEKEKKKKKEKKEKKEKKKKRKKKEKE 


* * 
* FUNCTION 32: SET/GET USER CODE * 
* * 
KRREKEKKEKEKKEKKEKEKKEKEKKEKKKEKKKKKKKKKKKKKKKKEEK 
* Entry Parameters: * 
* Register C: 20H * 
* Register E: @FFH (get) or 
* User Code (set) * 
* * 
* Returned Value: * 
= Register A: Current Code or * 
* (no value) * 
KRRKEKKKKEKKEKKKEKEKKEKKKKKKKKKKKKKKKKKKRKKRKKE 


An application program can change or interrogate the currently 
active user number by calling function 32, If register E = @FFH, then 
the value of the current user number is returned in register A, where 
the value is in the range @ to 31. If register E is not QOFFH, then 
the current user number is changed to the value of E (modulo 32). 
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KAKEKKKEKKKEKEKKEKIKEKKEKEKRREEREKEKEREKREREE 
* * 
* FUNCTION 33: READ RANDOM . 
k 
REKKKKKKKEKREKRKEREKEKKREKKEREKRKKKRKKKRKKRREE 
Entry Parameters: * 
Register C: 21H 
Registers DE: FCB Address 


Returned Value: 


Register A: Return Code 
KKREKEKKKKEKKKKEKKEKEKEKEERERRAKERKKRKRKEKKKE 


* 
* 
* 
* 
* 
* 
* 

The Read Random function is similar to the sequential file read 
operation of previous releases, except that the read operation takes 
place at a particular record number, selected by the 24-bit value 
constructed from the three byte field following the FCB (byte 
positions r@ at 33, rl at 34, and r2 at 35). Note that the sequence 
of 24 bits is stored with least significant byte first (r@), middle 
byte next (rl)., and high byte last (r2). CP/M does not reference byte 
r2, except in computing the size of a file (function 35). Byte r2 


must be zero, however, since a non-zero value indicates overflow past 
the end of file, 


Thus, the r@,rl byte pair is treated as a double-byte, or "word" 
value, which contains the record to read. This value ranges from 9 to 
65535, providing access to any particular record of the 8 megabyte 
file. In order to process a file using random access, the base extent 
(extent 6) must first be opened, Although the base extent may or may 
not contain any allocated data, this ensures that the file is properly 
recorded in the directory, and is visible in DIR _ requests. The 
selected record number is then stored into the random record field 
(r@,r1), and the BDOS is called to read the record. Upon return from 
the call, register A either contains an error code, as listed below, 
or the value 9@ indicating the operation was successful. In the 
latter case, the current DMA address contains the randomly accessed 
record, Note that contrary to the sequential read operation, the 
record number is not advanced, Thus, subsequent random read 
operations continue to read the same record, 


Upon each random read operation, the logical extent. and current 
record values are automatically set, Thus, the file can be 
sequentially read or written, starting from the current randomly 
accessed position, Note, however, that in this case, the last 
randomly read record will be re-read as you switch from random mode to 
sequential read, and the last record will be re-written as you switch 
to a sequential write operation. You can, of course, simply advance 
the random record position following each random read or write to 
obtain the effect of a sequential I/O operation, 


Error codes returned in register A following a random read are 
listed below. 
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01 reading unwritten data 

@2 (not returned in random mode) 
83 cannot close current extent 
64 seek to unwritten extent 

@5 (not returned in read mode) 

96 seek past physical end of disk 


Error code @1 and @4 occur when a random read operation accesses a 
data block which has not been previously written, or an extent which 
has not been created, which are equivalent conditions. Error 3 does 
not normally occur under proper system operation, but can be cleared 
by simply re-reading, or re-opening extent zero as long as the disk is 
not physically write protected. Error code 06 occurs whenever byte r2 
is non-zero under the current 2.9 release, Normally, non-zero return 
codes can be treated as missing data, with zero return codes 
indicating operation complete, 
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REKKKKKKKKKEKKEKEKEKEKKEKKEKKKKKKKKKKKKKKKE 


* * 
* FUNCTION 34: WRITE RANDOM * 
* * 
KRREKKKKKEKKKKKEKKKKEKREKEEREKEKRKEKEKKEKKEKKEKER 
* Entry Parameters: . 
= Register C: 22H * 
* Registers DE: FCB Address * 
* * 
* Returned Value: * 
* Register A: Return Code * 
KRREKKKKKEKEKKKKEKEKKEKEKKKKKKKKKKKKKKKKKKKKE 


The Write Random operation is initiated similar to the Read 
Random call, except that data is written to the disk from the current 
DMA address, Further, if the disk extent or data block which is’ the 
target of the write has not yet been allocated, the allocation is 
performed before the write operation continues, As in the Read Random 
operation, the random record number is not changed as a result of the 
write, The logical extent number and current record positions of the 
file control block are set to correspond to the random record which is 
being written, Again, seguential read or write operations can 
commence following a random write, with the notation that the 
currently addressed record is either read or rewritten again as_ the 
sequential operation begins. You can also simply advance the random 
record position following each write to get the effect of a sequential 
write operation. Note that in particular, reading or writing the last 
record of an extent in random mode does not cause an automatic extent 
switch as it does in sequential mode, 


The error codes returned by a random write are identical to the 
random read operation with the addition of error code 05, which 


indicates that a new extent cannot be created due to directory 
overflow. 
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RREKKKEKEKKKKEKEKKKEKEKREKEKKEKKKKKKKKRK KKK 


* if * 
* FUNCTION 35: COMPUTE FILE SIZE * 
* * 
HK KKK KIER IK KERR KEKE REEKKKEKR RK } 
* Entry Parameters: * 
* Register C: 23H * 
* Registers DE: FCB Address * 
* k 
* Returned Value: * 
* Random Record Field Set * 
KRKKKKEKKEKKEKEKEKHEKKEKKKERKKKKRKKKKKKRKRKKEKK 


When computing the size of a file, the DE register pair 
addresses an FCB in random mode format (bytes r@, rl, and r2 are 
present), The FCB contains an unambiguaqus file name which is used in 
the directory scan. Upon return, the random record bytes contain the 
“virtual" file size which is, in effect, the record address of the 
record following the end of the file. if, following a call to 
function 35, the high record byte r2 is 01, then the file contains the 
maximum record count 65536. Otherwise, bytes r@ and rl constitute a 
16-bit value (r@ is the least significant byte, as before) which is 
the file size. : 


Data can be appended to the end of an existing file by simply 
calling function 35 to set the rdndom record position to the end of 
file, then performing a sequence of random writes starting at the 
preset record address, 


The virtual size of a file corresponds to the physical size when 
the file is written sequentially. If, instead, the file was created 
in random mode and "holes" exist in the allocation, then the file may 
in fact contain fewer records than the size indicates. Tf, for 
example, only the last record of an eight megabyte file is written in 
random mode (1.e., record number 65535), then the virtual size is 
65536 records, although only one block of data is actually allocated. 
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KREKEKEKKEKKKKEKREKEKKEKEKEKEKKEKKEKKKKKKKKRKRKEKKEE 
* * 
* FUNCTION 36: SET RANDOM RECORD * 
* * 
RREKKEKKEKKKKKEKKKEKKKEKKEKKEKKKEKKKKKKKKKKKKK 


* Entry Parameters: 
Register C: 24H 
Registers DE: FCB Address 


* 
* 
* 
* Returned Value: 
*k 
* 


Random Record Field Set 
KREKKKKKEKKKKKKEKKKKKKRKKKKKKK RK KKEKKEEK 


* 
* 
* 
* 
* 
* 
* 
The Set Random Record function causes the BDOS to automatically 
produce the random record position from a file which has been read or 


written sequentially to a particular point. The function can be 
useful in two ways. 


First, it is often necessary to initially read and scan a 
sequential file to extract the positions of various "key" fields. As 
each key is encountered, function 36 is called to compute the random 
record position for the data corresponding to this key. If the data 
unit size is 128 bytes, the resulting record position is placed into a 
table with the key for later retrieval, After scanning the entire 
file and tabularizing the keys and their record numbers, you can move 
instantly to a particular keyed record by performing a random read 
using the corresponding random record number which was saved earlier. 
The scheme is easily generalized when variable record lengths are 
involved since the program need only store the buffer-relative byte 
position along with the key and record number in order to find the 
exact starting position of the keyed data at a later time. 


A second use of function 36 occurs when switching from a 
sequential read or write over to random read or write, A file is 
sequentially accessed to a particular point in the file, function 36 
is called which sets thé record number, and subsequent random read and 
write operations continue from the selected point in the file, 
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3. A SAMPLE FILE-TO-FILE COPY PROGRAM, 


The program shown below provides a relatively simple example of 
file operations, The program source file is created as COPY.ASM using 
the CP/M ED program and then assembled using ASM or MAC, resulting in 
a “HEX” file, The LOAD program is the used to produce a COPY.COM file 
which executes directly under the CCP. The program begins by setting 
the stack pointer to a local area, and then proceeds to move the 
second name from the default area at @96CH to a 33-byte file control 
block called DFCB. The DFCB is then prepared for file operations by 
clearing the current record field. At this point, the source and 
destination FCB's are ready for processing since the SFCB at 695CH is 
properly set-up by the CCP upon entry to the COPY program, ‘That is, 
the first name is placed into the default fcb, with the proper fields 


zeroed, including the current record field at O@7CH. The program 
continues by opening the source file, deleting any exising destination 
file, and then creating the destination file. If allthis is 


successful, the program loops at the label COPY until each record has 


been read from the source file and placed into the destination file. 
Upon completion of the data transfer, the destination file is closed 


and the program returns to the CCP command level by jumping to BOOT. 


sample file-to-file copy program 
at the ccp level, the command 


copy a:x.y b:u.v 


copies the file named x.y from drive 
a-to a file named u.v on drive b. 


=e te TO Te MSE TF NE NO 


0068 = boot equ $090h ; system reboot 
8895 = bdos egu 88@5h > bdos entry point 
8G5c = fcbl equ 895ch ; first file name 
9G5c = sfcb equ fcbl 7; source fcb 
866c = fcb2 equ 686ch : second file name 
0088 = dbuff equ "$@@80h ; default buffer 
6198 = tpa egu 8186h ; beginning of tpa 
e 
8089 = printf equ 9 : print buffer func# 
BOBE = openf equ 15 ; open file func# 
$618 = closef equ 16 + close file func# 
8013 = deletef egu 19 : delete file func# 
8814 = readf equ 26 ; seguential read 
8615 = writef equ 21 : sequential write 
0616 = makef equ 22 ¢ make file func# 
6196 org tpa ; beginning of tpa 
9186 311b62 lxi sp,stack; local stack 
; move second file name to dfcb 
#183 Gel® mvi c,16 s half -an fcb 
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8185 116c898 lxi d,fcb2 ;.source of move 
8188 2l1daél lxi h,dfcb ; destination fcb 
G18b la mfchb: ldax d s source fcb 
G18c 13 inx d ; ready next 
®@ 818d 77 mov m,a : dest fcb 
G1lGe 23 inx h s ready next 
G19f Ba dcr c : count 16...0 
8118 c20bG1 jnz mfcb ; loop 16 times 
? name has been moved, zero cr 
@113 af xra a : a = OO@h 
8114 32faG1 sta dfcbcr ; current rec = @ 


source and destination fcb's ready 


me me WS 


8117 115c89 lxi d,sfcb ; source file 
Blla cd6961 call open ; error if 255 
Blid 1187901 lxi d,nofile; ready message 
8128 3c inr a ; 255 becomes @ 
6121 cc6191 cz finis : done if no file 

; source file open, prep destination 
8124 lldag#l lxi ad,dfcb ; destination 
9127 cd7361 call delete ; remove if present 
Gl2a 1ldagl Lxi d,dfcb ; destination 
612d cd8261 call make : create the file 
8138 119601 lxi d,nodir ; ready message 
0133 3c inr a > 255 becomes @ 

& 9134 cc61g1 CZ ' finis ; done if no dir space 


source file open, dest file open 
copy until end of file on source 


Q se we we Ne 


8137 115c®@ copy: Llxi d,sfcb ; source 
813a cd786l call read 3 read next record 
@13d b7 ora a : end of file? 
G13e c25181 jnz eofile ; skip write if so 

: not end of file, write the record 
8141 lldagl 1xi d,dfcb ; destination 
0144 cd7dgl1 call write ¢ write record 
8147 11a961 lxi d,space ; ready message 
Q@14a b7 ora a : @@ if write ok 
G814b c461961 cnz finis ; end if so 
014e c33781 jmp copy ; loop until eof 

‘ 

eofile: ; end of file, close destination 
6151 lidagl ixi d,dfcb ; destination 
0154 cd6e81 call close ; 255 if error 
8157 21bb61 lxi h,wrprot; ready message 
@15a 3c inr a : 255 becomes 06 
@15b cc6181 Cz finis ; shouldn't happen 


=e ~e 


copy operation complete, end 
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015e llecGl ixi d,normal; ready message 


; 
finis: ; write message given by de, reboot 


9161 BeB9 mvi @,printt 
8163 cd@500 call bdos ; write message 
9166 c30008 jmp boot ; reboot system 


system interface subroutines 
(all return directly from bdos) 


Owe se se se 


0169 Bevf pen: mvi c,openf 
016b c38500 jmp bdos 
®l6e Geld close: mvi c,closef 
0178 c38500 jmp bdos 
8173 Bel3 delete: mvi c,deletef 
8175 c30500 jmp bdos 
0178 Bel4 read: mvi c,readf 
G17a c305008 jmp bdos 
017d el15 write: mvi c,writef 
O17£ c386588 jmp bdos 
0182 Gel16 make: mvi c,makef 
0184 c30500 jmp bdos 
; console messages 
0187 6e6£20fnofile: db ‘no source files' 
0196 6e6£289nodir: db ‘no directory spaces’ 
®la9 6£7574fspace: db ‘out of data space$' 
Olbb 7772695wrprot: db ‘write protected?$' 
Blcc 636£70Gnormal: db ‘copy complete$' 
H data areas 
®lda dfcb: ds 33 ; destination fcb 
@lfa = dfcbcr equ dfcb+32 ; current record 
G@1fb ds 32 ; 16 level stack 
stack: 
@21b end 


Note that there are several simplifications in this particular 
program, First, there are no checks for invalid file names which 
could, for example, contain ambiguous’ references, This situation 


could be detected by scanning the 32 byte default area starting at 
location ®@@5CH for ASCII question marks, A check should also be made 


to ensure that the file names have, in fact, been included (check 
locations @@5DH and ®@6DH for non-blank ASCII characters). Finally, a 
check should be made to ensure that the source and destination ile 
names are different. A speed improvement could be made by buffering 
more data on each read operation. One could, for example, determine 
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the size of memory by fetching FBASE from location ®@096H and use the 
entire remaining portion of memory for a data buffer. In this case, 
the programmer simply resets the DMA address to the next successive 
128 byte area before each read. Upon writing to the destination file, 
the MA address is reset to the beginning of the buffer and 
incremented by 128 bytes to the end as each record is transferred to 
the destination file. 
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4, A SAMPLE FILE DUMP UTILITY, 


The file dump program shown below is slightly more complex than 
the simple copy program given in the previous section. The dump 
program reads an input file, specified in the CCP command line, and 
displays the content of each record in hexadecimal format at the 
console, Note that the dump program saves’ the CCP's stack upon entry, 
resets the stack to a local area, and restores the CCP's stack before 
returning directly to the CCP, Thus, the dump program does not 
perform and warm start at the end of processing. 


; DUMP program reads input file and displays hex data 
: 


81008 org 18@h 
6885 = bdos egu 8895h :dos entry point 
6001 = cons egu 1 sread console 
Q002 = typef equ 2 stype function 
0809 = printf equ 9 ;buffer print entry 
O88Bb = brkf£ equ 11 ;break key function (true if char 
QGGLf = openf equ 15 ;file open 
0614 = readf equ 208 ;read function 
605c = fcb egu 5ch ;file control block address 
0088 = buff equ 80h s;input disk buffer address 
; non graphic characters 
086d = cr equ gdh ;Carriage return 
@6d8a = lf equ gah sline feed 
: file control block definitions 
@0G5c = fcbdn egu fcbt+é :;disk name 
885d = fcbfn equ Ecbt+l1 sfile name 
0865 = Ecbft equ fcbt+9 ;disk file type (3 characters) 
0868 = fcbrl egu feb+l12 ;file's current reel number 
6686b = fcbre equ feb+15 ;file's record count (9 to 128) 
G@G7c = fcbcr equ fcb+32 ;current (next) record number (@ 
687d = fcblin equ fcb+33 ;fcb length 
; set up stack 
8198 219696 ‘Lxi h,®@ 
8183 39 dad sp 
; entry stack pointer in hl from the ccp 
0184 221562 shld oldsp 
: set sp to local stack area (restored at finis) 
9187 315762 lxi sp,stktop 
: read and print successive buffers 
G818a cdclGl call setup ;set up input file 
610d feff cpi 255 2255 if file not present 
G19f c21bG1 jnz openok ;sSkip if open is ok 
: file not there, give error message and return 
8112 11£301 lxi d,opnmsg 
0115 cd9c8l call err 
8118 c35161 jmp finis ;to return 


™=s 
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openok: ;open operation ok, set buffer index to end 


G1l1b 3e88 mvi a,8@h 
G11d 321362 sta ibp ;set buffer pointer to 80h 
: hl contains next address to print 
® 8120 210900 1xi h,B ;start with 9000 
gloop: 
0123 e5 push h ;save line position 
9124 cda2g1 call gnb 
§127 el pop h ;recall line position 
8128 da5161 jc finis scarry set by gnb if end file 
G@12b 47 mov b,a 


print hex values 
check for line fold 


=e =O 


Q@12c 7d mov a,l 
G@12d eb6Of ani Ofh :check low 4 bits 
G812f c24461 jnz nonum 
; print line number 
9132 cd7261 call erlf 
; check for break key 
8135 cd59@1 call break 
; accum lsb = 1 if character ready 
0138 GE rre sinto carry 
8139 da51@1 jc finis ;don‘t print any more 
013c 7c Mov a,h 
613d cd8f£gl call phex 
8146 7d mov a,l 
& 6141 cd8fOl call phex 
: nonum: 
9144 23 inx h sto next line number 
6145 3e28 mvi ay" 
8147 cd65@1 call pchar 
14a 78 mov a,b 
G014b cd8fB1 call phex 
G14e c32361 jmp gloop 
Finis: 
H end of dump, return to ccp 
; (note that a jmp to @80@h reboots) 
8151 cd7261 call erlf 
6154 2a1582 lhid oldsp 
8157 £9 sphl 
; stack pointer contains ccp's stack location 
8158 c9 ret sto the ccp 
subroutines 


Ose se se xe 


reak: ;check break key (actually any key will do) 


8159 e5da5c5 push h! push d! push b; environment saved 
G15c Bebb mvi c,brkf ‘ 
815e cdO50B call, bdos 

9161 cldlel pop b! pop d! pop h; environment restored 
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0164 c9 ret 


a 
pehar: ;print a character 


0165 e5d5c5 push h! push d! push b; saved 
9168 BeGB2 mvi c,typef 
Ol6a 5f mov e,a 
016b cd@506 call bdos 
§16e cldlel pop b! pop da! pop h; restored 
@171 c9 ret 
crlf: 
9172 3e0d mvi a,cer 
0174 cd65@1 call pchar 
0177 3eBa mvi a,lf 
9179 cd65@1 call pchar 
G17c c9 ret 


pnib: ;print nibble in reg a 


017d e60f ani Ofh slow 4 bits 
®17£ feBa cpi 16 
0181 d289@1 jnc pla 
' less than or egual to 9 
9184 c630 adi ‘g' 
9186 c38b61 jmp prn 
; greater or equal to 19 
9189 c637 pld@: adi ‘a' - 10 
618b cd65@1 prn: call pehar 
@18e c9 ret 
phex: ;print hex char in reg a 
018f £5 push psw 
0190 Of rre 
8191 OF rre 
8192 OF rrec 
0193 Of rre 
0194 cd7d@l call pnib sprint nibble 
0197 f1 pop psw 
9198 cd7d@1 call pnib 
819b c9 ret 
errs sprint error message 
: d,e addresses message ending with "$" 
019c Beb9 mvi ¢,printeé ;print buffer function 
G819e cdG58B call bdos 
lal c9 ret 
gnb: ;get next byte 
Gla2 3a1382 lda ibp 
Gla5 fe8O cpi 88h 
Ola7 c2b361 jnz gB 


read another buffer 


=e se 
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G1cl 
G1c2 


G1c5 
@1c8 
Blca 


B1cd 


Blce 
G1dl1 
01d4 
@1d6 
@1da9 
Bldc 


8 1dd 
91£3 


§213 
8215 


8217 


9257 


=e 


=e 


321362 


=e =e 


218000 
19 


Te 


b7 
c9 


af 
327c0O 


=e 


115c00 
Debt 
cdd500 


=e 


c9 


Qs 
e- 
n 

ral 

tal 

ee 


e5d5c5 
115c@B 
Gel4 
cdg500 
cldlel 
c9 


enme 


46494c@signon: 
GdGa4eHopnmsg: 


7 
ibp: 
oldsp: 


call 
ora 


jz 


diskr 
a 
gO 


;zero value if read ok 
;for another byte 


end of data, return with carry set for eof 


stc 
ret 


;read the byte at bufftreg a 


mov 
mvi 
inr 
sta 


e,a 
d,@ 
a 

ibp 


sls byte of buffer index 
;double precision index to de 
; index=index+l 

;back to memory 


pointer is incremented 
save the current file address 


lxi 
dad 


h,buf 
d 


FE 


absolute character address is in hl 


mov 


a,m 


byte is in the accumulator 


ora 
ret 


a 


;set up file 
open the file for input 


xra 
sta 


lxi 
mvi 
call 


a 
Ecbcr 


d,f£cb 


c,openf 


bdos 


255 in accum if 


ret 


;read disk file 
push h! push qd! 


lxi 
mvi 
call 


d,fcb 


c,readf 


bdos 


;reset carry bit 


s;zero to accum 


sclear current record 


open error 


record 
push b 


pop b! pop d! pop h 


ret 


fixed message area 
‘file dump version 2.0$' 
cr,lf,'no input file present on disk$' 


db 
db 


variable area 


ds 
ds 


2 
2 


stack area 


ds 


end 


64 
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;input buffer pointer 
sentry sp value from ccp 


sreserve 32 level stack 
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5. A SAMPLE RANDOM ACCESS PROGRAM. 


This manual is concluded with a rather extensive, but complete 
example of random access operation, The program listed below performs 
the simple function of reading or writing random records upon command 
from the terminal. Given that the program has been created, 


assembled, and placed into a file’ labelled RANDOM.COM, the CCP level 
command: 


RANDOM X.DAT 


starts the test program. The program looks for a file by the name 
X.DAT (in this particular case) and, if found, proceeds to prompt the 
console for input. If not found, the file is created before the 
prompt is given, Each prompt takes the form 


next command? 


and is followed by operator input, terminated by a carriage return. 
The input commands take the form 


nw nR Q 


where n is an integer value in the range @ to 65535, and W, R, and Q 
are simple command characters corresponding to random write, random 
read, and quit processing, respectively. If the W command is’ issued, 
the RANDOM program issues the prompt 


type data: 


The operator then responds by typing up to 127 characters, followed by 
a carriage return, RANDOM then writes the character string into the 
X.DAT file at record n. If the R command is issued, RANDOM reads 
record number n and displays the string value at the console. If the 
Q command is issued, the X.DAT file is closed, and the program returns 
to the console command processor. In the interest of brevity, the 
only error message is 


error, try again 


The program begins with an initialization section where the 
input file is opened or created, followed by a continuous loop at the 
label "ready" where the individual commands are interpreted. The 
default file control block at @@5CH and the default buffer at @680H 
are used in all disk operations. The utility subroutines then follow, 
which contain the principal input line processor, called "readc." 
This particular program shows the elements of random access 


processing, and can be used as the basis for further program 
development. 
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g RR KKRKKKKE KKK EK KEK KEKE EKER E KKK REE KER ERR EERKERERKEEEE 
ox * 
;* sample random access program for cp/m 2.0 ¥ 
ox * 
© (GIGI ISSCC GI IOICIGIG IO ICIGIGI I IICIEIGI ICCC III III I ICK 
0190 org 19@h ;base of tpa 
0000 = reboot equ 0800h ;system reboot 
0005 = bdos equ 88@5h ;bdos entry point 
0601 = coninp egu 1 ;console input function 
G082 = conout egu 2 ;console output function 
0009 = Pstring equ 9 ;print string until ‘'S$' 
G00a = rstring egu 108 ;read console buffer 
G@G0c = version equ 12 ;return version number 
OB08f = openf equ 5 ;file open function 
0018 = closef equ 16 ;close function 
0016 = makef equ 22 ;make file function 
0021 = readr equ 33 sread random 
6022 = writer equ 34 ;write random 
O85c = fcb equ @@5ch ‘;default file control block 
O8G7d = ranrec equ fcb+33 ;random record position 
OO7£ = ranovf equ fcb+35 ;high order (overflow) byte 
0080 = buff egu 8880h s;buffer address 
060d = cr equ Odh ;carriage return 
OG0Ga = 1f egu Bah ;line feed 
© BGI GIOIIIGIOCGOCCICICICTCICICICICIGI GIGI GIGI III III IOI 
o* * 
;* load SP, set-up file for random access * 
* * 
(OCG IGICII GIGS SIS GIG CICISISGIOIIOGIOIDE 
0198 31bc@ lxi sp,stack 
: version 2.0? 
9183 Bedc mvi c,version 
8105 cdg5a call bdos 
6108 fe29 cpi 28h s;version 2.@ or better? 
G@18a d2160 jnec versok 
; bad version, message and go back 
818d 111bd ixi d,badver 
9118 cddag call print 
9113 c3660 jmp reboot 
versok: 
; correct version for random access 
@116 Bef mvi c,openf ;open default fcb 
8118 115c@ Li d,fcb 
G1lb cd@5B call bdos 
| Blle 3c inr a ;err 255 becomes zero 
| ®11£ c2370 siz ready 


. 


=e se 


cannot open file, so create it 
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9122 Gel6 mvi c,makef 

8124 115c@ lxi d,fcb 

0127 cdag50 call bdos 

B1l2a 3c inr a serr 255 becomes zero 
G§12b c2379 jnz ready 


me we 


cannot create file, directory full 


@12e 113aG xi d,nospace 

8131 cddag call print 

0134 c3900 jmp reboot ;back to ccp 
WISTITICIITITT TTT TTT TTT TTT i ttt tit ttt ttt i tire eee itty 
o* * 
:;* loop back to “ready" after each command * 
* * 


CHKEKKKKKEKEKKEKEKRKKEKEKKKEKEKEKKRERERKEKEEKERERKRKKKKKKKEE 


é 


=e 


ready: 
? file is ready for processing 

9137 cde5@ call readcom ;read next command 

@13a 227d0 shld ~" ranrec ;store input record# 

813d 217£0 lxi h,ranovf 

9146 3609 mvi m,@ :;clear high byte if set 

0142 fe5l cpi ‘Q' ;quit? 

8144 c2566 jnz notq 
; quit processing, close file 

0147 Bel®@ mvi c,closef 

0149 115c0 lxi d,fcb 

G14c cdB5G call bdos 

014f 3c inr a ;err 255 becomes 0 

8158 cab9G 4z error ;error message, retry 

8153 c3008 jmp reboot ;back to ccp 
ETT II IIIT TTT Tit titi tt ttt tt itt it tert i tit ttt ttt itt 
o* * 
7* end of guit command, process write * 
«x * 
DIIGO GIGI TCC IIIT Ik 
notq: 
: not the guit command, random write? 

9156 fe57 cpi ‘w' 

08158 c2899 jnz notw 
: this is a random write, fill buffer until cr 

815b 114dG lxi d,datmsg 

G815e cddad call ”’ print ;data prompt 

161 @e7E£ mvi c,127 sup to 127 characters 

8163 21886 lxi h,buff ;destination 
rloop: ;read next character to buff 

8166 c5 push b ;save counter 

6167 e5 push h snext destination 

8168 cdc2g8 call getchr ;character toa 

G16b el pop h ;restore counter 
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616c cl pop b ;restore next to fill 


016d fed cpi cr send of line? 

916£ ca78O jz erloop 
: not end, store character 

€ 0172 77 mov m,a 

0173 23 inx h snext to fill 

09174 0d dcr c ;counter goes down 

0175 c2660 jnz rloop send of buffer? 
erloop: 
? end of read loop, store 96 

8178 3600 mvi m,@ 
, 
; write the record to selected record number 

G17a Be22 mvi c,writer 

G817c 115c@ lxi d, feb 

B®17£E cd#5B call bdos 

09182 b7 ora a serror code zero? 

8183 c2b9@ jnz error ;message if not 

8186 c3378 jmp ready ;for another record 
ESET TTT ETT T TTT TTT ET ETT TTT TTTTTTTTT TTT TCC T COTTE TTT 
o* * 
7* end of write command, process read * 
o* * 
WETTTTTTITT TTT TTT TT TTT TLT LTTE LETET LETTE 
notws 
; not a write command, read record? 

8189 fe52 cpi ‘Re? 

G818b c2b90 jnz error ;skip if not 

D : read random record 

G18e Ge21 mvi c,readr 

8198 115c@ ixi d,fcb 

8193 cd050 call bdos 

8196 b7 ora a ;return code 90? 

9197 c2b90 jnz error 
: read was successful, write to console 

19a cdcf@ call erle ;new line 

819d Ge8sO mvi ¢,128 ;max 128 characters 

O19£F 21800 lxi h,buff ;next to get 
wloop: 

Gla2 7e mov a,m s;next character 

Bla3 23 inx h ;next to get 

Ola4 e67f ani 7fh ;mask parity 

O81la6 ca378 jz ready ;for another command if 00 

Gl1a9 c5 push b ;Save counter 

laa e5 push h ;Save next to get 

Blab fe29 cpi . # ;graphic? 

Blad d4c8@ cnc putchr ;skip output if not 

B1bg el pop h 

G1lb1 cl pop b 

Glb2 Od dcr c ;count=count-1 

G81b3 c2a2@ jnz wloop 

O81b6 c3370 jmp ready 
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@1b9 


®ibe 
O@1lbf 


Q1c2 
91c4 
G1lc7 


G1c8 
Glca 
@1lcb 
®lce 


O1lcf 
81dl 
@1d4 
81d6 
@1d9 


Glda 
G1ldb 
Glde 
G1df 
@lel 
G1e4 


Gle5 
G1e8 
Gleb 
Sled 
@1£¢ 


11596 


cddag 
C3370 


Bebl 
cdg5¢ 
c9 


GeG2 
5f£ 
cdg5é 
c9 


3e8da 
cdc8@ 
3e@a 
cdc8g 
c9 


d5 
cdcfO 
dal 
GeB9 
cdg56 
c9 


116ba@ 
cddag 
fega 

117a@ 
cdg5¢ 


KKK KK KIKI KI KIKI IKK RIKI ERI REAR IKE RHR KERRI 
* 


end of read command, all errors end-up here * 
* 


RRKKKKEKEKRKKE KE KEKE KEE KREEKEKRKKKKEREKEERRERERKRERKEKERKEK 


+ + + + 


~e ~e ~e Se te NO TO 


error: 
lxi d,errmsg 
call print 
jmp ready 
c 
p RRR REE KKK KKK KEK KEK KERR EK EKER ERE RE RE REREREREKEREKEK 
* * 
;* utility subroutines for console i/o * 
ox * 
TTT IIIT IST T ITT TTT TTT TTT TTT TT LITT TT TTT TT TTT 
getchr: 
;read next console character toa 
mvi c,coninp 
call bdos 
ret 
; 
putchr: 
swrite character from a to console 
mvi c,conout 
mov e,a scharacter to send 
call bdos :send character 
ret 
; 
crlf: 
;send carriage return line feed 
mvi a,cr ;carriage return 
call putchr 
mvi a,lf sline feed 
call putchr 
ret 
? 
print: 
sprint the buffer addressed by de until §$ 
push d 
call crlf 
pop d snew line 
mvi c,pstring 
call bdos sprint the string 
ret 
; 
readcom: 
;read the next command line to the conbuf 
1lxi d,prompt 
call print ; command? 
mvi c,rstring 
lxi d,conbuf 
call bdos :read command line 


command line is present, Scan it 


=e 
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ba * s 


@1f3 21008 kxi h,@ ;Start with @000 
G81£6 117cd lxi d,conlin;command line 
@1£9 la readc: ldax d snext command character 
Glfa 13 inx d ;to next command position 
6 ®1fb b7 ora a ;cannot be end of command 
“ lfc c8 rz 
; not zero, numeric? 
@1fd d63¢ sui 'g! 
61ff fega cpi 16 scarry if numeric 
8201 4213¢ jnec endrd 
: add-in next digit 
8204 29 dad h 2*2 
8265 4d mov c,l 
0286 44 mov b,h s:bc = value * 2 
8207 29 dad h 3*4 
8288 29 dad h 2 *8 
8209 99 dad b 2*2 + *8 = *19 
G2Ga 85 add 1 stdigit 
G20b 6£ mov l,a 
@20c d2f9G jnc readc ;for another char 
G20f 24 inr h :overflow 
0218 c3f£9B jmp. readc ;for another char 
endrd: 
: end of read, restore value ina 
8213 c639 adi ‘g' ; command 
@215 feél cpi ‘a' ;translate case? 
6217 d8 rc ; 
; lower case, mask lower case bits 
rs 0218 e65£ ani 191$1111b 


e B2la c9 ret 


TT ITT TTT TTI LTTE LLL LLL LLL LLL 
ok * 
’ 
;* string data area for console messages * 
eX ¥ * 
IT EIITITITTTLIT ITT TTT T LTT TTT TTT TTL TTT TTL ELE Let it 
badver: 

@21b 536£79 db ‘sorry, you need cp/m version 2$' 
nospace: 

023a 4e6£29 db ‘no directory spaces’ 
datmsg: 

824d 547978 db ‘type data: $' 
errmsg: 

8259 457272 db ‘error, try again.$' 
prompt: 

826b 4ce6579 db "next command? $' 


’ 
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g RR RKKRKEKKEKEKKKKKKE KEKE RKEEKEKEKREKEKEEEKEKEEKEKEKERERKEK 


e* * 
;* fixed and variable data area * 
o* * 
SETTTTTTTTTTTETETTTTETTTT ETT CTT TCLTTCTTTTCTeTTTeTe 
27a 21 conbuf: db conlen ;length of console buffer 
@27b consiz: ds 1 ;resulting size after read 
827¢c conlin: ds 32 ;length 32 buffer 
0921 = conlen equ $-consiz 
929c ‘ ds 32 ;16 level stack 
stack: 
§2be end 


Again, major improvements could be made to this particular 
program to enhance its operation, In fact, with some work, this 
program could evolve into a simple data base management system. One 
could, for example, assume a standard record size of 128 bytes, 
consisting of arbitrary fields within the record. A program, called 
GETKEY, could be developed which first reads a sequential file and 
extracts a specific field defined by the operator. For example, the 
command 


GETKEY NAMES.DAT LASTNAME 198 28 


would cause GETKEY to read the data base file NAMES.DAT and extract 
the "“LASTNAME" field from each record, starting at position 18 and 
ending at character 20. GETKEY builds a table in memory consisting of 
each particular LASTNAME field, along with its 16-bit record number 
location within the file. The GETKEY program then sorts this list, 
and writes a new file, called LASTNAME.KEY, which is an alphabetical 
list of LASTNAME fields with their corresponding record numbers, 
(This list is called an “inverted index" in information retrieval 
parlance, ) 


Rename the program shown above as QUERY, and massage it a bit so 
that it reads a sorted key file into memory. The command line might 
appear as: 


QUERY NAMES.DAT LASTNAME, KEY 


Instead of reading a number, the QUERY program reads an alphanumeric 
string which is a particular key to find in the NAMES.DAT data base, 
Since the LASTNAME.KEY list is sorted, you can find a particular entry 
guite rapidly by performing a “binary search," similar to looking up a 
name in the telephone book. That is, starting at both ends of the 
list, you examine the entry halfway in between and, if not matched, 
split either the upper half or the lower half for the next’ search, 
You'll quickly reach the item you're looking for (in log2(n) steps) 
where you'll find the corresponding record number, Fetch and display 
this record at the console, just as we have done in the program shown 
above. 
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At this point you're just getting started. With a little more 
work, you can allow a fixed grouping size which differs from the 128 
byte record shown above. This is accomplished by keeping track of the 
record number as well as the byte offset within the record, Knowing 
the group size, you randomly access the record containing the proper 
group, offset to the beginning of the group within the record read 
sequentially until the group size has been exhausted. 


Finally, you can improve QUERY considerably by allowing boolean 
expressions which compute the set of records which satisfy several 
relationships, such as a LASTNAME between HARDY and LAUREL, and an AGE 
less than 45. Display all the records which fit this description, 
Finally, if your lists are getting too big to fit into memory, 
randomly access your key files from the disk as well. One note of 
consolation after all this work: if you make it through the project, 
you'll have no more need for this manual! 
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6. SYSTEM FUNCTION SUMMARY, 


FUNC FUNCTION NAME INPUT PARAMETERS 


OUTPUT RESULTS 


i] System Reset none none 

i Console Input none A = char 

2 Console Output E = char none 

3 Reader Input none A = char 

4 Punch Output E = char none 

5 List Output E = char none 

6 Direct Console I/O see def see def 

7 Get I/O Byte none A = IOBYTE 

8 Set I/O Byte E = IOBYTE none 

9 Print String DE = .Buffer none 
16 Read Console Buffer DE = .Buffer see def 
Li Get Console Status none A = 00/FF 

12 Return Version Number none HL= Version* 
13 Reset Disk System none see def 
14 Select Disk E = Disk Number see def 

i5 Open File DE = .FCB A = Dir Code 
16 Close File DE = .FCB A = Dir Code 
17 Search for First DE = .FCB A = Dir Code 
18 Search for Next none A = Dir Code 
19 Delete File DE = ,FCB A = Dir Code 
26 Read Sequential DE = .FCB A = Err Code 
24 Write Sequential DE = .FCB A = Err Code 
22 Make File DE = .FCB A = Dir Code 
23 Rename File DE = .FCB A = Dir Code 
24 Return Login Vector none HL= Login Vect* 
25 Return Current Disk none A = Cur Disk# 
26 Set DMA Address DE = .DMA none 

27 Get Addr (Alloc) none HL= .Alloc 
28 Write Protect Disk none see def 
29 Get R/O Vector none HL= R/O Vect* 
30 Set File Attributes DE = .FCB see def 
31 Get Addr(disk parms) none HL= .DPB 
32 Set/Get User Code see def see def 
33 Read Random DE = .FCB A = Err Code 
34 Write Random DE = .FCB A = Err Code 
35 Compute File Size DE = .FCB ro, Ll, £2 
36 Set Random Record DE = ,.FCB ro, Fl, F2 


* Note that A = L, and B = H upon return 
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1. AWN OVERVIEW OF CP/M 2.0 FACILITIES. 


CP/fi 2.9 is a high-performance single-console operating system 
which uses table driven tecnnigues to allow field reconfiguration to 
match a wide variety of disk capacities. All of the fundamental file 
restrictions are removed, while maintaining upward compatibility from 
previous versions of release 1. Features of CP/M 2.6 include field 
specification of one to sixteen logical drives, eacn containing up to 
eignt megabytes, Any particular file can reacn the full drive size 
witn the capability to expand to thirty-two megabytes in future 
releases. The directory size can be field configured to contain any 
reasonable number of entries, and each file is optionally tagged with 
read/fonly and system attributes. Users of CP/M 2.¥ are physically 
separated oy user numbers, with facilities for file copy operations 
from one user area to another. powerful relative-record random access 
functions are present in CP/M 2.8 which provide direct access to any 
of the 65536 records of an eight megabyte file. 


All disk-dependent portions of CP/M 2.0 are placed into a 
BIOS-resident “disk oarameter block" which is either hand coded or 
produced automatically using the disk definition macro library 
provided with CP/M 2.0. The end user need only specify the maximum 
numoer of active disks, the starting and ending sector numbers, the 
data allocation size, the maximum extent of the logical disk, 
directory size information, and reserved track values. The macros use 
this intormation to generate the appropriate tables and table 
references for use during CP/M 2.0 operation. Deblocking information 
is also provided wnich aids in assembly or disassembly of sector sizes 
wnich are multioles of tne fundamental 128 byte data unit, and the 
system alteration manual includes general-purpose subroutines which 
use the tnis deblocking information to take advantage of larger sector 
sizes. Use of these subroutines, together with the table driven data 
access algoritnms, make CP/M 2.0 truly a universal data management 
system, 


File expansion is achieved by providing up to 512 logical file 
extents, where eacn logical extent contains 16K bytes of data. CP/M 
2.8 is structured, nowever, so that as much as 128K bytes of data is 
addressed by a single physical extent (corresponding to a single 
directory entry), thus maintaining compatibility with orevious 
versions while taking full advantage of directory space. 


Random access facilities are present in CP/M 2.0 which allow 
immediate reference to any record of an eight megabyte file. Using 
CP/M's unigue data organization, data blocks are only allocated when 
actually required and movement to a record position requires little 
search time. Sequential file access is uoward compatible from earlier 
versions to the full eight megaoytes, while random access 
compatibility stops at 512K byte files. Due to CP/M 2.8's simoler and 
faster random access, application orogrammers are encouraged to alter 
their programs to take full advantage of the 2.0 facilities. 


Several CP/M 2.0 modules and utilities have improvements which 
correspond to the enhanced file system. STAT and PIP both account for 
file attributes and user areas, while the CCP vrovides a “login" 
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function to change from one user area to anotner. The CCP also 
formats directory displays in a more convenient manner and accounts 
for poth CRT and hard-copy devices in its enhanced line editing 
functions. 


The sections below point out the individual differences between 
CP/M 1.4 and CP/M 2.8, with the understanding that the reader is 
either familiar with CP/M 1.4, or has access to the 1.4 manuals. 
Additional information dealing with CP/M 2.08 I/O system alteration is 
presented in the Digital Research manual "CP/M 2.8 Alteration Guide." 
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2. USER INTERFACE, 


Console line processing takes CRI-type devices into account with 
three new control characters, shown with an asterisk in the list below 
(the symbol “ctl" below indicates that the control key is 
simultaneously depressed) : 


rub/del removes and ecnoes last character 

ctl-C reboot when at beginning of line 

ctl-E physical end of line 

ctl-H packspace one cnaracter position* 

ctl-J (line feed) terminates current input* 
ctl-M (carriage return) terminates input 
ctl-R retype current line after new line 
ctl-U remove current line after new line 
ctl-X backspace to beginning of current line* 


In particular, note that ctl-H produces the proper backspace overwrite 
function (ctl-H can be changed internally to another character, such 
as delete, through a simple single byte change). Further, the line 
editor keeps track of the current prompt column position so that the 
operator can properly align data input following a ctl-U, ctl-R, or 
ctl-xX command, 
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3. CONSOLE COMMAND PROCESSOR (CCP) INTERFACE. 


There are four functional ditferences between CP/M 1.4 and CP/M 
2.6 at the console command processor (CCP) level. The CCP now 
displays directory information across the screen (four elements’ per 
line), the USER command is present to allow maintenance of separate 
files in the same directory, and the actions of the “ERA *.*" and 
"SAVE" commands have changed, The altered DIR format is 
self-explanatory, while the USER command takes the form: 


USER n 


where n is an integer value in the range @ to 15. Upon cold start, 
the operator is automatically “logged" into user area number @, which 
is compatible with standard CP/M 1.4 directories, The operator may 
issue the USER command at any time to move to another logical area 
within the same directory, Drives which are logged-in while 
addressing one user number are automatically active when the operator 
moves to another user numper since a user number is simply a prefix 
which accesses particular directory entries on the active disks, 


The active user number is maintained until changed by a 
subsequent USER command, or until a cold start operation when user §g 
is again assumed. 


Due to the fact that user numbers now tag individual directory 
entries, tne ERA *.* command has a different effect. In version 1.4, 
this command can be used to erase a directory whicn has "“garbage" 
information, vernhaps resulting from use ot a diskette under another 
operating system (heaven forbid!). In 2.0, however, the ERA *,* 
command affects only the current user number, Thus, it is necessary 
to write a simple utility to erase a nonsense disk (the program simply 
writes the hexadecimal pattern E5 throughout the disk). 


The SAVE command in version 1.4 allows only a single memory save 
operation, with the potential of destroying the memory image due to 
directory operations following extent boundary changes. Version 2.9, 
nowever, does not perform directory operations in user data areas 
after disk writes, and thus the SAVE operation can be used any number 
of times without altering the memory image. 
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4, STAT ENHANCEMENTS, 


The STAT program has a number of additional functions which 
allow disk parameter display, user number display, and file indicator 
manipulation. The command: 


STAT VAL: 


produces a summary of the available status commands, resulting in the 
output: 


Temo R/O Disk: d:=R/0 

Set Indicator: d:filename.typ $R/O S$R/W SSYS SDIR 
Disk Status DSK: d:DSK: 

User Status USR: 

Iobyte Assign: 

(list of possible assignments) 


whicn gives an instant summary of the possible STAT commands. The 
command form: 
STAT d:filename.tyo $S 


wnere “d:" is an optional drive name, and "“filename.typ"” is an 
unambiguous or ambiguous file name, ovoroduces the output display 
format: 

Size Recs Bytes Ext Acc 


438 48 6k 1 R/O A:ED,COM 
bbe 55 12k 1 R/O (A:PIP.COM) 
65536 128 2k 2 R/W A:X.DAT 


where tne $S parameter causes the "“Size" field to be disvlayed 
(without the $S, the Size field is skipped, but the remaining fields 
are displayed). The Size field lists the virtual file size in 
records, while the "Recs" field sums the number of virtual records in 
each extent. For files constructed seguentially, the Size and Recs 
fields are identical, The “Bytes” field lists the actual number of 
bytes allocated to the corresponding file. The minimum allocation 
unit is determined at configuration time, and thus the number of bytes 
corresponds to the record count vlus the remaining unused space in the 
last allocated block for sequential files. Random access files are 
given data areas only when written, so the Bytes field contains the 
only accurate allocation figure. In the case of random access, the 
Size field gives the logical end-of-file record position and the Recs 
field counts the logical records of each extent (each of these 
extents, however, may contain unallocated “holes" even though they are 
added into the record count), The "Ext" field counts the number of 
logical 16K extents allocated to the file. Unlike version 1.4, the 
Ext count does not necessarily correspond to the number of directory 
entries given to the file, since there can be up to 128K pytes (8 
logical extents) directly addressed by a single directory entry, 
depending upon allocation size (in a special case, there are actually 
256K bytes which can be directly addressed by a pvhysical extent). 


The “Acc" field gives the R/O or R/W access mode, which is 
changed using the commands shown below. Similarly, the parentheses 
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shown around the PIP.COM file name indicate that it has the "system" 
indicator set, so that it will not be listed in DIR commands. The 
four command forms 


STAT d:filename.typ $R/0O 
STAT d:filename.tyo SR/W 
STAT d:filename.typ $SYS 
STAT d:filename.tyo SDIR 


set or reset various permanent file indicators, The R/O indicator 
places the file (or set of files) in a read-only status until changed 
by a subsequent STAT command. The R/O status is recorded in the 
directory with tne file so that it remains R/O through intervening 
cold start operations. The R/W indicator places the file in a 
permanent read/write status. The SYS indicator attaches the system 
indicator to the file, while the DIR command removes the system 
indicator. The “filename.typo" may be ambiguous or unambiguous, but in 
eitner case, the files whose attributes are changed are listed at the 
console when the change occurs. The drive name denoted by "d:" is 
optional. 


When a file is marked R/O, subsequent attempts to erase or write 
into the file result in a terminal BDOS message 


Bdos Err on d: File R/O 


The BOOS then waits for a console input before performing a subsequent 
warm start (a “return” is sufficient to continue). The command form 


STAT d:DSK: 


lists the drive characteristics of the disk named by "d:“ which is in 
the range A:, B:, ..., P:. The drive characteristics are listed in 
the format: 


d: Drive Characteristics 
65536: 128 Byte record Capacity 
8192: Kilopyte Drive Capacity 
128: 32 Byte Directory Entries 
®: Checked Directory Entries 
1024: Records/ Extent 
128: Records/ Block 
58: Sectors/ Track 
2: Reserved Tracks 


where “d:" is the selected drive, followed by the total _ record 
capacity (65536 is an 8 megabyte drive), followed by the total 
capacity listed in Kilobytes. The directory size is listed next, 
followed by the “checked" entries. The number of checked entries is 
usually identical to the directory size for removable media, since 
this mechanism is used to detect changed media during CP/M operation 
without an intervening warm start. For fixed media, the number is 
usually zero, since the media is not changed without at least a cold 
Or warm start. The number of records per extent determines’ the 
addressing capacity of each directory entry (1024 times 128 bytes, or 
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128K in the example above). The number of records per block shows the 
basic allocation size (in the example, 128 records/plock times 128 
bytes per record, or 16K pbpytes per block). The listing is then 
followed by the number otf physical sectors ver track and the number of 
reserved tracks. For logical drives whicn share the same physical 
disk, the number of reserved tracks may be guite large, since this 
mechanism is used to skip lower-numbered disk areas allocated to other 
logical disks, The command form 


STAT DSK: 


oroduces a drive characteristics table for all currently active 
drives. The final STAT command form is 


STAT USR: 


which produces a list of the user numbers whicn have files on the 
currently addressed disk. The display format is: 


Active User : @ 
Active Files: @ 1 3 


where the first line lists the currently addressed user number, as set 
by the last CCP USER command, followed by a list of user numbers 
scanned from the current directory, In the above case, the active 
user numper is ¥ (default at cold start), with three user numbers 
which have active files on the current disk. The operator can 
subsequently examine the directories of the other user numbers by 
logging-in with USER 1, USER 2, or USER 3 commands, followed by a DIR 
command at the CCP level. 
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5. PIP ENHANCEMENTS, 


PIP provides three new functions which account for the features 
of: CP/M 2.0, All three functions take the form of file parameters 
which are enclosed in square prackets following the appropriate file 
names, The commands are: 


Gn Get File from User number n 
(n in the range #6 - 15) 


W Write over R/O files without 
console interrogation 


R Read system files 


The G command allows one user area to receive data files from another, 


Assuming the operator has issued the USER 4 command at the CCP level, 
the PIP statement 


PIP X.Y = X.Y[G2] 


reads file X.Y from user number 2 into user area number 4, The 
command 


PIP A:=A:*.*[G2] 


copies all of the files from the A drive directory for user number 2 
into the A drive directory of the currently logged user number. Note 
that to ensure file security, one cannot copy files into a different 
area than the one which is currently addressed by the USER command. 


Note also that the PIP program itself is initially copied to a 
user area (so that subsequent files can be copied) using the SAVE 
command, The sequence of operations shown below effectively moves PIP 
from one user area to the next, 


USER Jv login user g 

DDT PIP.COM load PIP to memory 
(note PIP size s) 

GO return to CCP 

USER 3 login user 3 


SAVE s PIP.COM 


where s is the integral number of memory "pages" (256 byte segments) 
occupied by PIP, The number’ s can be determined when PIP.COM is 
loaded under DDT, by referring to the value under the "NEXT" display. 
If for example, the next available address is 1D89, then PIP.COM 
requires 1C hexadecimal pages (or 1 times 16 + 12 = 28 pages), and 
thus the value of s is 28 in the subsequent save. Once PIP is copied 
in this manner, it can then be copied to another disk belonging to the 
same user number through normal pip transfers, 


Under normal operation, PIP will not overwrite a file which is 
set to a permanent R/O status, If attempt is made to overwrite a R/O 
file, the prompt 
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NFSTINATION FILE IS R/O, DELETE (Y/N)? 


is issued. If the operator responds with the character “y" then the 
file is overwritten, Otherwise, the response 


** NOT DELETED ** 


is issued, the file transfer is skippped, and PIP continues with the 
next operation in sequence. In order to avoid the prompt and response 
in the case of R/O file overwrite, the command line can include the W 
parameter, as shown below 


PIP A:=B:*.COM[W] 


which copies all non-system files to.the A drive from the B drive, and 
overwrites any R/O files in the process. If the operation involves 
several concatenated files, the W parameter need only be included with 
the last file in the list, as shown in the following example 


PIP A.DAT = B.DAT,F:NEW.DAT,G:OLD.DAT[W] 


Files with the system attribute can be included in PIP transfers 
if the R parameter is included, otherwise system files are not 
recognized. The command line 


PIP ED.COM = 8:ED,CUOM[R] 


for example, reads the ED,COM file from the B drive, even if it has 
been marked as a R/O ana system file. The system file attributes are 
copied, if present, 


It should be noted that downward compatibility with previous 
versions of CP/M is only maintained if the file does not exceed one 
megabyte, no file attributes are set, and the file is created by user 
0. If compatibility is required with non-standard (e.g., “double 
density") versions of 1.4, it may be necessary to select 1.4 
compatibility mode when constructing the internal disk parameter block 
(see the “CP/M 2.0 Alteration Guide," and refer to Section 18 which 
describes BIOS differences). 
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6. ED ENHANCEMENTS, 


The CP/M standard orogram editor provides several new facilities 
in the 2.0 release. Experience has shown that most operators use the 
relative line numbering feature of ED, and thus the editor has the “v" 
(Verify Line) option set as an initial value. The operator can, of 
course, disable line numbering by typing the “-v" command. If you are 
not familiar with the ED line number mode, you may wish to refer to 
the Appendix in the ED user's guide, where the "“v" command is 
described, 


ED also takes file attributes into account. If the operator 
attempts to edit a read/only file, the message 


** FILE IS READ/ONLY ** 
appears at the console, The file can pe loaded and examined, but 
cannot be altered in any way. Normally, the operator simply ends the 
edit session, and uses STAT to change the file attribute to R/W. If 
the edited file has the "system" attribute set, the message 
“SYSTEM” FILE NOT ACCESSIBLE 

is displayed at the console, and the edit session is aborted. Again, 
the STAT program can be used to change the system attribute, if 
desired, 


Finally, the insert mode ("i") command allows CRT line editing 
functions, as described in Section 2, above, 
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7. THE XSUB FUNCTION, 


An additional utility program is supplied with version 2.0 of 
CP/M, called XSUB, which extends the power of the SUBMIT facility to 
include line input to programs as well as the console command 
processor, The XSUB command is included as the first line of your 
submit file and, when executed, self-relocates directly below the CCP. 
All subsequent submit command lines are processed by XSUB, so that 
programs which read buffered console input (BDOS function 18) receive 
their input directly from the submit file. For example, the file 
SAVER.SUB could contain the submit lines: 


with a subsequent SUBMIT command: 
SUBMIT SAVER X Y 
which substitutes X for $1 and Y for $2 in the command stream. The 
XSUB program loads, followed by DDT which is sent the command lines 
“IX.HEX" “R" and “G@" thus returning to the CCP. The final command 
“SAVE 1 Y.COM" is processed by the CCP, 
The XSUB program remains in memory, and prints the message 
(xsub active) 

on each warm start operation to indicate its presence, Subsequent 
submit command streams do not require the XSUB, unless an intervening 


cold start has occurred. Note that XSUB must be loaded after DESPOOL, 
if both are to run simultaneously. 
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8. BDOS INTERFACE CONVENTIONS, 


CP/M 2.0 system calls take place in exactly the same manner as 
earlier versions, with a call to location §6905H, function number in 
register C, and information address in register pair DE. Single byte 
values are returned in register A, with double byte values returned in 
HL (for reasons of compatibility, register A = L and register B = H 
upon return in all cases). A list of CP/M 2.6 calls is given below, 
with an asterisk following functions which are either new or revised 
from version 1.4 to 2.0. Note that a zero value is returned for 
out-of range function numbers, 


@ System Reset 19* Delete File 

1 Console Input 20 Read Sequential 

2 Console Output 21 Write Sequential 

3 Reader Input 22* Make File 

4 Punch Output 23* Rename File 

5 List Output 24* Return Login Vector 

6* Direct Console I/0 25 Return Current Disk 

7 Get I/O Byte 26 Set DMA Address 

8 Set I/O Byte 27 Get Addr(Alloc) 

9 Print String 28* Write Protect Disk 
10* Read Console Buffer 29* Get Addr(R/O Vector) 
11 Get Console Status 30* Set File Attributes 
12* Return Version Number 31* Get Addr(Disk Parms) 
13 Reset Disk System 32* Set/Get User Code 
14 Select Disk 33* Read Random 
15* Open File 34* Write Random 
16 Close File 35* Comoute File Size 
17* Search for First 36* Set Random Record 


18* Search for Next 


(Functions 28, 29, and 32 should be avoided in application programs to 
maintain upward compatibility with MP/M.) The new or revised functions 
are described below. 


Function 6: Direct Console I/0. 


Direct Console I/0 is supported under CP/M 2.8 for those 
applications where it is necessary to avoid the BDOS console I/O 
operations, Programs whicn currently perform direct I/O through the 
BIOS should be changed to use direct I/O under BDOS so that they can 
be fully supported under future releases of MP/M and CP/M, 


Upon entry to function 6, register £ eitner contains hexadecimal 
FF, denoting a console input request, or register E contains an ASCII 
character, If the input value is FF, then function 6 returns A = 60 
if no character is ready, otherwise A contains the next console input 
character. 


If the input value in £— is not FF, then function 6 assumes’ that 
E contains a valid ASCII character which is sent to the console. 
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Function 19: Read Console Buffer. 


The console buffer read operation remains unchanged except that 
console line editing is supported, as described in Section 2. Note 
also that certain functions which return the carriage to the leftmost 
position (e.g., ctl-X) do so only to the column position where the 
prompt ended (previously, the carriage returned to the extreme left 
margin). This new convention makes operator data input and line 
correction more legible, 


Function 12: Return Version Number. 


Function 12 has been redefined to orovide information which 
allows version-independent vrogramming (this was previously the “lift 
head" function whicn returned HL=0089 in version 1.4, but performed no 
operation). The value returned by function 12 is a two-byte value, 
with H = 6@ for the CP/M release (H = @1 for MP/M), and L = 69 for all 
releases previous to 2.0. CP/M 2.0 returns a hexadecimal 20 in 
register L, with subsequent version 2 releases in the hexadecimal 
range 21, 22, through 2F., Using function 12, for examole, you can 
write application programs which provide both sequential and _ random 
access functions, with random access disabled when operating under 
early releases of CP/M. 


In the file overations described below, DE addresses a file 
control olock (FCB). Further, all directory operations take place in 
a reserved area which does not affect write buffers as was the case in 
version 1.4, with the exception of Searcn First and Search Next, where 
compatibility is required. 


The File Control Block (FCB) data area consists of a sequence of 33 
bytes for sequential access, and a series of 36 bytes in the case that 
the file is accessed randomly. The default file control block 
normally located at #J5CH can be used for random access files, since 
bytes @07DH, WJB7EH, and §907FH are available for this purpose. For 
notational purposes, the FCB format is shown with the following 
fields: 


(All Information Contained Herein is Proprietary to Digital Research.) 


13 


62 @1 82 
where 


dr 


£1...£8 


tl, t2,E3 


ex 


sl 
$2 


re 


dé...dn 


cr 


r0,rl,r2 


€68 $69 16 1 i213 14 15 16 Jee 


ol 32 33 34 35 


drive code (J - 16) 

®@ => use default drive for file 
l1 => auto disk select drive A, 
2 => auto disk select drive B, 


16=> auto disk select drive P. 
in ASCII 


bit 4) 


contain the file name 
upper case, with high 


contain the file type in ASCII 
upper case, with high bit 9 
tl’, t2', and t3’ denote the 

bit of these positions, 

tl' = 1 => Read/Only file, 

t2° 1 => SYS file, no DIR list 


contains 
normally 
in range 


the current extent number, 
set to @@ by the user, but 
@ - 31 during file I/0 

reserved for internal system use 


reserved for internal system use, set 
to zero on call to OPEN, MAKE, SEARCH 


record count for extent “ex,” 
takes on values from @ - 128 


filled-in by CP/M, reserved for 
system use 


current record to read or write in 
a sequential file operation, normally 
set to zero by user 


optional random record number in the 
range #§-65535, with overflow to r2, 
r@,rl constitute a 16-bit value with 
low byte r@, and high byte rl 


Function 15: Open File. 


with the 


Tne Open File operation is identical to previous definitions, 
exception that byte s2 is automatically zeroed. Note that 
previous versions of CP/M defined this byte as zero, but made no 
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cnecks to assure. compliance, Thus, the byte is cleared to ensure 
upward compatibility with the latest version, where it is required. 


Function 17: Searcn for First, 


Search First scans the directory for a match with the file given 
by the FCB addressed by DE, The value 255 (hexadecimal FF) is 
returned if the file is not found, otherwise a value of A egual to @, 
1, 2, or 3 is returned indicating the file is present. In the case 
that the file is found, the current DMA address is filled with the 
record containing tne directory entry, and the relative starting 
position is A * 32 (i.e., rotate the A register left 5 bits, or ADD A 
five times). Although not normally required for application programs, 
the directory information can be extracted from the buffer at this 
position, 


An ASCII question mark (63 decimal, 3F hexadecimal) in any 
position from fl through ex matches the corresponding field of any 
directory entry on the default or auto-selected disk drive. If the dr 
field contains an ASCII question mark, then the auto disk select 
function is disabled, the default disk is searched, with the search 
function returning any matched entry, allocated or free, belonging to 
any user number, This latter function is not normally used by 
application programs, out does allow complete flexibility to scan all 
current directory values. If the dr field is not a question mark, the 
s2 byte is automatically zeroed. 


Function 18: Search for Next, 


The Search Next function is similar to the Search First 
function, except that the directory scan continues from the last 
matched entry. Similar to function 17, function 18 returns the 
decimal value 255 in A when no more directory items match, 


Function 19: Delete File, 


The Delete File function removes files whicn match the FCB 
addressed by DE, The filename and type may contain ambiguous 
references (i.e., question marks in various positions), but the drive 
select code cannot be ambiguous, as in the Search and Search Next 
functions, 


Function 19 returns a decimal 255 if the reference file or files 
could not be found, otherwise a value in the range @ to 3 is returned. 
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Function 22: Make File, 


The Make File operation is identical to previous versions of 
CP/M, except that byte s2 is zeroed upon entry to the 8DOS,. 


Function 23: Rename File, 


The Actions of the file rename functions are the same as 
previous releases except that the value 255 is returned if the rename 
function is unsuccessful (the file to rename could not be _ found), 
otherwise a value in the range ¥ to 3 is returned, 


Function 24: Return Login Vector, 


The login vector value returned by CP/M 2.0 is a 16-bit value in 
HL, where the least significant bit of L corresponds to the first 
drive A, and the high order bit of H corresponds to the sixteenth 
drive, labelled P,. Note that compatibility is maintained with earlier 
releases, since registers A and L contain the same values upon return, 


Function 28: Write Protect Current Disk. 


The disk write protect function provides temoorary write 
protection for the currently selected disk. Any attempt to write to 
the disk, before the next cold or warm start operation produces the 
message 


Bdos Err on d: R/O 


Function 29: Get R/O Vector, 


Function 29 returns a bit vector in register pair HL which 
indicates drives which have the temporary read/only bit set. Similar 
to function 24, the least significant pit corresponds to drive A, 
while the most significant bit corresponds to drive P. The R/O bit is 
set either by an explicit call to function 28, or by the automatic 
software mechanisms within CP/M which detect changed disks. 


Function 38: Set File Attributes. 


The Set File Attributes function allows programmatic 
manipulation of permanent indicators attached to files. In 
particular, the R/O and System attributes (tl’' and t2' above) can be 
set or reset, The DE pair addresses an unambiguous file name with the 
appropriate attributes set or reset, Function 3@ searches for a 
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match, and changes the matched directory entry to contain the selected 
inaicators, Indicators fl' through f£4' are not presently used, but 
may be useful for applications programs, since they are not involved 
in the matching process during file open and close operations. 
Indicators £5° tnrough £8' and t3’ are reserved for future system 
expansion, 


Function 3l: Get Disk Parameter Block Address, 


The address of the BIOS resident disk parameter block is 
returned in AL as a result of this function call. This address can be 
used for either of two purposes, First, the disk parameter values can 
be extracted for display and space computation purposes, or transient 
programs can dynamically change the values of current disk parameters 
when the disk environment changes, if required. Normally, apvvlication 
programs will not require this facility. 


Function 32: Set or Get User Code, 


An application program can change or interrogate the currently 
active user number py calling function 32, If register E = FF 
nexadecimal, then tne value of the current user number is returned in 
register A, where the value is in the range 9 to 31. If register E is 
not FF, then the current user number is changed to the value of £E 
(modulo 32). 


Function 33: Read Random, 


The Read Random function is similar to the sequential file read 
operation of previous releases, except that the read operation takes 
olace at a particular record number, selected by the 24-bit value 
constructed from the three byte field following the FCB (byte 
cositions r@ at 33, rl at 34, and r2 at 35). Note that the sequence 
of 24 bits is stored with least significant pyte first (r¥), middle 
byte next (rl), and high byte last (r2). CP/M release 2.8 does not 
reference byte r2, except in computing the size of a file (function 
35). Byte r2 must be zero, however, since a non-zero value indicates 
overflow past the end of file, 


Thus, in version 2.0, the r#,rl byte pair is treated as a 
double-byte, or “word” value, which contains the record to read. This 
value ranges from 8 to 65535, providing access to any particular 
record of the 8 megabyte file. In order to orocess a file using 
random access, the base extent (extent 9) must first be opened, 
Altnough the pase extent may or may not contain any allocated data, 
this ensures that the file is properly recorded in the directory, and 
is visible in DIR requests, The selected record number is then stored 
into the random record field (rd,rl), and the BDOS is called to read 
the record. Upon return from the call, register A either contains an 
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error code, as listed below, or the value 48 indicating the operation 
was successful. In the latter case, the current DMA address contains 
the randomly accessed record, Note that contrary to the sequential 
read operation, the record number is not advanced. Thus, subsequent 
random read operations continue to read the same record, 


Upon each random read operation, the logical extent and current 
record values are automatically set, Thus, the file can be 
seguentially read or written, starting from the current randomly 
accessed position, Note, however, that in this case, the last 
randomly read record will be re-read as you switch from random mode to 
sequential read, and the last record will be re-written as you switch 
to a sequential write operation, You can, of course, simply advance 
the random record position following each random read or write to 
obtain the effect of a sequential I/O operation, 


Error codes returned in register A following a random read are 
listed below. 


$1 reading unwritten data 

@2 (not returned in random mode) 
83 cannot close current extent 

84 seek to unwritten extent 

05 (not returned in read mode) 

96 seek past physical end of disk 


Error coae #61 and #4 occur when a random read operation accesses a 
data block which has not been previously written, or an extent which 
has not been created, which are equivalent conditions. Error 3 does 
not normally occur under proper system operation, but can be cleared 
by simply re-reading, or re-opening extent zero as long as the disk is 
not physically write protected. Error code 96 occurs whenever byte r2 
is non-zero under the current 2.9 release, Normally, non-zero return 
codes can be treated as missing data, with zero return codes 
indicating operation complete, 


Function 34: Write Random, 


The Write Random operation is initiated similar to the Read 
Random call, except that data is written to the disk from the current 
DMA address, Further, if the disk extent or data block which is’ the 
target of the write has not yet been allocated, the allocation is 
performed before the write operation continues. As in the Read Random 
operation, the random record number is not changed as a result of the 
write, The logical extent number and current record positions of the 
file control block are set to correspond to the random record which is 
being written. Again, sequential read or write operations can 
commence following a random write, with the notation that the 
currently addressed record is either read or rewritten again as_ the 
sequential operation begins. You can also simply advance the random 
record position following each write to get the effect of a sequential 
write operation, Note that in particular, reading or writing the last 
record of an extent in random mode does not cause an automatic extent 


(All Information Contained Herein is Proprietary to Digital Research.) 


18 


switch as it does in seguential mode under either CP/M 1.4 or CP/M 
2.8. 


The error codes returned by a random write are identical to the 
random read operation with the addition of error code #5, which 
indicates that a new extent cannot be created due to directory 
overflow. 


Function 35: Compute File Size. 


When computing the size of a file, the DE register pair 
addresses an FCB in random mode format (bytes r@, rl, and r2 are 
present). The FCB contains an unambiguous file name which is used in 
the directory scan. Upon return, the random record bytes contain the 
“virtual” file size which is, in effect, the record address of the 
record following the end of the file, if, following a call to 
function 35, the high record byte r2 is 61, then the file contains the 
maximum record count 65536 in version 2.8. Otherwise, bytes r@ and rl 
constitute a 16-bit value (r® is the least significant byte, as 
before) which is the file size, 


Data can be appended to the end of an existing file by simoly 
calling function 35 to set the random record position to the end of 
file, tnen performing a sequence of random writes starting at the 
preset record address, 


The virtual size of a file corresponds to the physical size when 
the file is written sequentially. If, instead, the file was created 
in random mode and “holes" exist in the allocation, then the file may 
in fact contain fewer records than the size indicates, if, £0£ 
example, only the last record of an eight megabyte file is written in 
random mode (i.e., record number 65535), then the virtual size is 
65536 records, although only one block of data is actually allocated. 


Function 36: Set Random Record. 


The Set Random Record function causes the BDOS to automatically 
produce the random record position from a file which has been read or 
written sequentially to a particular point, The function can be 
useful in two ways. 


First, it is often necessary to initially read and scan a 
sequential file to extract the positions of various “key" fields. As 
each key is encountered, function 36 is called to compute the random 
record position for the data corresponding to this key. If the data 
unit size is 128 bytes, the resulting record vosition is placed into a 
table with the key for later retrieval. After scanning the entire 
file and tabularizing the keys and their record numbers, you can move 
instantly to a particular keyed record by performing a random read 
using the corresponding random record number which was saved earlier. 
The scheme is easily generalized when variable record lengths are 
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involved since the program need only store the buffer-relative byte 
position along with the key and record number in order to find the 
exact starting position of the keyed data at a later time, 


A second use of function 36 occurs when switching from a 
sequential read or write over to random read or write. A file is 
sequentially accessed to a particular point in the file, function 36 
is called which sets the record number, and subsequent random read and 
write operations continue from the selected point in the file, 


This section is concluded with a rather extensive, but complete 
example of random access operation, The program listed below performs 
the simple function of reading or writing random records upon command 
from the terminal. Given that the program has been created, 
assembled, and placed into a file labelled RANDOM.COM, the CCP level 
command: 


RANDOM X.DAT 


starts the test program. The program looks for a file by the name 
X.DAT (in this particular case) and, if found, proceeds to prompt the 
console for input. If not found, the file is created before the 
orompt is given. Each prompt takes the form 


next command? 


and is followed by operator input, terminated by a carriage return, 
The input commands take the form 


nw nR Q 


where n is an integer value in the range @ to 65535, and W, R, and Q 
are simple command characters corresponding to random write, random 
read, and guit processing, resvectively. If the W command is issued, 
the RANDOM program issues the prompt 


type data: 


The operator then responds by typing up to 127 characters, followed by 
a carriage return, RANDOM then writes the character string into the 
X.DAT file at record n. If the R command is issued, RANDOM reads 
record number n and displays the string value at the console. If the 
Q command is issued, the X.DAT file is closed, and the program returns 
to the console command processor. In the interest of brevity (ok, so 
the program's not so brief), the only error message is 


error, try again 
The vrogram begins with an initialization section where the 
input file is opened or created, followed by a continuous loop at the 
label “ready” where the individual commands are interpreted. The 
default file control block at 005CH and the default buffer at #080H 
are used in all disk operations. The utility subroutines then follow, 


(All Information Contained Herein is Proprietary to Digital Research.) 


20 


which contain the principal 


This 


particular 


processing, 


development. 


9100 


9193 
9105 
0198 
Wlida 


b10d 
0119 
9113 


31bcd 


BeBc 
cdg50 
fe2 
d216G@ 


111bd 
cddag 
c30908 


program 


and can be 


invut 
shows 
used a 


line processor, called 


the elements of random 


Ss 


the basis for further 


“readc, “ 
access 
program 


gE RKKEKKEKEKREKKKERERE KEE ERE KEE EKER ERK KEREREREKEKEKERE 


* 
’ 


;* sample random access program for cp/m 2.6 


ox 
’ 


x 
* 
* 


g RRKKKEKKKKKKE KEKE KKEEEKKERKKKERKEKKE KERR EKER EKKEERERE 


reboot 
bdos 


. 
‘ 


coninp 
conout 
pstring 
rstring 
version 
openf 
closef 
makef 
readar 
writer 


. 
’ 


fos 
ranrec 
ranovf 
buff 


e 
’ 


Cr 
Lf 


org 


eau 
equ 


egu 
equ 
equ 
equ 
egu 
equ 
egu 
equ 
egu 
equ 


equ 
equ 
equ 
equ 


equ 
equ 


10dh 


0800h 
0885h 


;base of tva 


ssystem reboot 
;bdos entry point 


;console input function 
;console output function 
sprint string until '‘'$' 
s;read console buffer 
s;return version number 
;file open function 
;close function 

;make file function 
;read random 

swrite random 


;default file control block 


random record position 


s;high order (overflow) byte 


s;buffer address 


;Ccarriage return 
;line feed 


’ 
g RKKKKKKKKEKKEKEKKE KKK KE KRKK KEKE KE KEKE KERR RKKREKERERKERKEKE 


o* 
, 


;* load 
3 * 


SP, set-up file for random access 


* 
* 
* 


g RR KKKKKKE KEKE KEKE KEKE KEKKE KE REE KEKE KE RKEKEEKEKKREKERKEEE 


=e =e 


=e 


, 
versok: 


’ 


;version 2.0 or better? 


bad version, message and go back 


lxi sp,stack 
version 2,0? 

mvi c,version 
call bdos 

cpi 28h 

jnc versok 
Lxi d,badver 
call print 

jmo reboot 


correct version for random access 
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ei 


9116 Bebf mvi c,openf ;open default fcb 


$118 115c@ Lxi ad,feb 

G1llb cd956 call bdos 

Olle 3c inr a serr 255 becomes zero 

W11£ c2378 jnz ready 
: cannot open file, so create it 

8122 gelb6 tmvi c,makef 

0124 115cd8 Lxi d,fcb 

0127 cdg58 call bdos 

Bl2a 3c inr a ;err 255 becomes zero 

9120 c2376 jnz ready 
; cannot create file, directory full 

dl2e 113ad Lxi d,nospace 

0131 cddagé call print 

8134 c39d0 jmp reboot ;back to ccp 
RREKKKKKEKKKKEKKEKKKKEKKEKKEKEKEKEKKEKKKEKEKKKKKKEKKEKKKKKKKEK 
* * 
* loop back to “ready" after each command * 
x * 


KRREKKKKKEKKKKKEKKRKEKKKKEKKEKKEKKEKKKERKEKEKKEKEKKKEKKKKEKKKKKK 


=e se PK se se we te Se te Ne 


eady: 
file is ready for processing 
0137 cdedW call readcom ;read next command 
O@13a 22708 shld ranrec ;store input record# 
813d 217f6 lxi h,canovt 
0146 3609 mvi m,@ ;clear high byte if set 
0142 fe5l epi “go squit? 
0144 c2560 jnz notg 
7 
; guit processing, close file 
0147 dels mvi c,closef 
0149 115cd 1lxi d,fcb 
014c cdd5d call bdos 
@14f 3c inr a ;err 255 becomes 0 
2158 cab9¢ jz error ;error message, retry 
0153 c3800 jmo reboot ;back to ccp 
TSG SOI IOCIGIGIGICICICIGISIIOICICIGISIOCICICIGIOIOICICICI IOI k 
ox * 
:* end of quit command, vrocess write * 
ox x 
PICO IGIIIOICICICI GIGI IOIOICIOICICICIIIOOICCCICICIGIICIO III I I I 
nota: 
H not the quit command, random write? 
0156 fe57 cpi ‘w' 
$9158 c2896 jnz notw 
: this is a random write, fill buffer until cr 
G15b 114d Lxi d,datmsg 
d15e cddad call print ;data prompt 
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0161 de7E mvi ¢,i27 sup to 127 characters 


163 21806 1lxi n,buff ;destination 
rloop: ;read next character to buff 
#166 c5 push b s;save counter 
© 0167 e5 push h snext destination 
9168 cdc20 call getchr ;character toa 
816b el pop h ;restore counter 
Jl6c cl pop b ;restore next to fill 
G@1l6d fegd cpi cr send of line? 
016f ca78O iz erlooo 
: not end, store character 
6172 77 mov m,a 
0173 23 inx h snext to fill 
8174 gd dcr c s;counter goes down 
0175 c2660 jnz rloop ;end of puffer? 
erloop: 
: end of read loop, store 06 
0178 3609 mvi m,0 
: write the record to selected record number 
17a be22 mvi c,writer 
017c 115cd 1lxi a, EC 
@17£ cde5d call bdos 
6182 b7 ora a ;error code zero? 
0183 c2b98 jnz error ;message if not 
0186 c337¥0 jmp ready ;for another record 
DGGE GIG GIOIOICIGIGSIGIIIOCCICI GIGI CIC IGIIOOOIICIII III IIE K 
* * 
€: ;* end of write command, vrocess read * 
«x * 
PCIIGIGIG IOC CICIGIISIICCISI GIGI ICI IIT III II TOI IK 
notw: 
; not a write command, read record? 
8189 fe52 cpi *R' 
018b c2b99 jnz error ;skip if not 
: read random record 
018e ge2l mvi c,readr 
8198 115cd lxi d,fcb 
9193 cdd58 call bdos 
0196 b7 ora a sreturn code 90? 
8197 c2b908 jnz error 
' 
: read was successful, write to console 
919a cdcfd call erif ;new line 
019d Yess mvi ¢, 128 ;max 128 characters 
O19£ 21809 lxi h,buf£ ;next to get 
wloop: 
Sla2 7e mov a,m snext character 
@la3 23 inx h s;next to get 
la4 e67£ ani 7fh ;mask parity 
9la6 ca370 jz ready ;for another command if 0@ 
@la9 c5 push b ;save counter 
tf ®laa e5 push h ;save next to get 
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Blab fe2¢d cpi ;graphic? 


Glad d4c8¢ cnc putchr ;skip output if not e 

Qlbv el pop h 

@lbl cl pop b 

@lb2 Od dcr c 7 count=count-1 

Y1b3 c2a29 jnz wloop 

01lb6 ¢c3370 jmp ready 
GIGI CISICIOICIGIOEICIGIGIIOITICCIOUIOCICICIOOICICICCICI IO IO k 
o* ; * 
;* end of read command, all errors end-un here * 
7* * 
PIG IIIOIOIOIIOOIOCCOICCCCICICICICICICIGIGI GIGI ICICI III ITO II Ik 
H 
e 


utility subroutines for console i/o * 
* 


g RKKKKKKEKEKKEEKEKKE EKER EKER KER KEKREKREKKEEKEREREKKEEEKEKERE 


* 


rror: 

G1b9 11596 Lxi d,errmsg 

Olbc cddad call print 

O1lb£ c3370 jmp ready 
(UII CCCI GIGI IOICIOICICICICI IG IGIOICIOCCICICICIGI III Ik 
7* i 
, 
ox 
, 
; 


getchr: 
;read next console character to a 
Glc2 bedl mvi c,coninp 
Q1c4 cdg5e call bdos 
Blc7 c9 ret 
putchr: 
swrite character from a to console 
Wlc8B Bew2 mvi c,conout 
®lca 5f mov e,a ;character to send 
Blcb cddg5¥ call bdos ;send character 
Ylce cY ret 
erlts 
;send carriage return line feed 
Wlc£ 3e@d mvi a,Cr ;Carriage return 
G1ldl cdc8d call putchr 
01d4 3ega mvi a, Let sline feed 
01d6 cdc8oO call putchr 
G1a9 c9 ret 
print: 
sprint the buffer addressed by de until $ 
®lda d5 push | 
Zldb cdcfs call Crit 
Olde dl pop d ;new line 
laf %eb9 mvi c,pstring 
Blel cdd5G call bdos sprint the string 
dle4 c9 ret 


’ 
readcom: 
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;read the next command line to the conbuf 


Wle5 116b¥ lxi d,prompt 

®le8 cddaé call print scommand? 

Bleb devia mvi c,rstring 

 £ Bled 117aé 1lxi d,conbuf 

O@1£8 cd@5G call bdos sread command line 
; command line is present, scan it 

O1£3 210008 Ext h,@ s;start with 0000 

G1£6 117c@ 1Lxi d,conlin;command line 

@1f£9 la readc: ldax | snext command character 

dlfa 13 inx d ;to next command position 

B1lfb b7 ora a ;cannot be end of command 

lfc c8 Cz 
: not zero, numeric? 

Blfd d63v8 sui 'g' 

O1£E feva cpi 19 scarry if numeric 

9201 d213d jne endrd 
: add-in next digit 

@204 29 dad h 2*2 

0205 4d mov Cyl 

6206 44 MOV p,h soc = value * 2 

$297 29 dad h 3*4 

9268 29 dad h 2*8 

0209 B9 dad b 2:*2 + *8 = *190 

Q@2¥a 85 add 1 stdigit 

J2yv0 OL mov l,a 

Q26c a2ftIB jne readc ;for another char 

d20f 24 inr h ;overflow 

@21v c3£9D jmp readc ;for another char 

© endrd: 

: end of read, restore value ina 

6213 c63¥ adi \g >command 

8215 feol epi a stranslate case? 

9217 d8 EC 
. lower case, mask lower case bits 

Q@218 eb65f ani 1061$1111b 

92la c9 ret 
GI IIIOICISCCCCICCICICICICI GIG IGIOISIOOOICICICICICIG CII II III III Ck 
* * 
;* string data area for console messages - 
ex * 
PICO IIOISICICICIGISIGIIOICICICICIGIIOIOCICICICICIGIIOOCICICICI III IKK 
badver: 

@21lb 536f£79 db ‘sorry, you need cp/m version 2$' 
nospace: 

023a 4e6f£29 db ‘no directory space$' 
datmsg: 

24d 547976 db ‘type data: $' 
errmsg: 

0259 457272 db ‘error, try again.$' 
prompt: 

926b 4e€6570 db ‘next command? $' 


; 
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g RRKKKKK KEKE REE KEKE KEKE KEE KEKE KER EKER EKER KK KRKKEKEKE 


ox * 
;* fixed and variable data area m 
o* * 
RGIS III IICIOIOICIOICOICICICICICICII CCI ICICI III II II III 
8@27a 21 conbuf: db conlen ;length of console buffer 
§27b consiz: ds 1 s;resulting size after read 
Q827c conlin: ds 32 slength 32 buffer 
9621 = conlen equ $-consiz 
, 
029c ds 32 316 level stack 
stack: 
@2be end 
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9. CP/M 2.0 MEMORY ORGANIZATION, 


Similar to earlier versions, CP/M 2.0 is field-altered to fit 
various memory sizes, depending upon the host computer memory 
configuration, Typical base addresses for popular memory sizes are 
shown in the table below, 


Module 20k 24k 32k 48k 64k 
CCP 3400H 4400H 6400H A400H E400H 
BDOS 3COVH 4CO0H 6C86H AC# OH EC@@H 
BIOS 4A00H 5A@0H 7A00H BAQOH FAQ 0H 


Top of Ram 4FFFH 5FFFH 7FFFA BFFFA FFFFHA 


The distribution disk contains a CP/M 2.8 system configured for a 20k 
Intel MDS-808 with standard I8M 8" floppy disk drives. The disk 
layout is shown below: 


Sector Track 09 Module Track #1 Module 
1 (Bootstrap Loader) 4980H BDOS + 480H 
3400H CCP + @O9H 41090H BDOS + 506H 
3 3486H CCP + 68H 418@H BDOS + 580H 
4 35808 CCP + 19@0H 4200H BDOS + 600H 
5 3580H CCP + 18H 423¥H BDOS + 680H 
6 360G6H CCP + 20GH 4300H BDOS + 700H 
7 3686H CCP + 28H 4384H BDOS + 78H 
is} 3700H CCP + 390H 440¥H BDOS + 800H 
) 3780H CCP + 38H 4480H BDOS + 88H 
1% 3800H CCP + 49@H 4500H BDOS + 900H 
Lt 388H CCP + 4380H 4580H BDOS + 98H 
12 3900H CCP + 50H 460¥H BDOS + A#OH 
13 398H CCP + 580H 468@H BDOS + A8@H 
14 3A00H CCP + 69H 4700H BDOS + BOOH 
15 3A86H CCP + 68H 4789H BDOS + B&s@H 
16 3BO8GH CCP + 790H 4860H BDOS + C9OH 
17 3B80H CCP + 780H 4889H BDOS + C8@H 
18 3C90H BDOS + 000H 4900H BDOS + DOOH 
19 3C80H BDOS + @80H 4980H BDOS + D8@H 
208 3D@@H BDOS + 109H 4AG0H BIOS + O@0H 
21 3D89H BDOS + 180H 4A80H BIOS + 989H 
22 3E99H BDOS + 206H 4B80H BIOS + 160H 
23 3E89H BDOS + 280H 4B8@H BIOS + 180H 
24 3F0@H BDOS + 396H 4COOH BIOS + 200H 
25 3F80H BDOS + 380H 4C80H BIOS + 280H 
26 4960H BDOS + 400H 4D80H BIOS + 300H 


In particular, note that the CCP is at the same position on the disk, 
and occupies the same space as version 1,4, The BDOS portion, 
however, occupies one more 256-byte page and the BIOS portion extends 
through the remainder of track 61. Thus, the CCP is 800H (2048 
decimal) bytes in length, the BDOS is EO@H (3584 decimal) bytes in 
length, and the BIOS is up to 380H (898 decimal) bytes in length. In 
version 2.8, the BIOS portion contains the standard subroutines of 
1.4, along with some initialized table space, as described in the 
following section, 
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18. BIOS DIFFERENCES. 


The CP/M 2.6 Basic I/O System differs only slightly in concept 
from its predecesssors, Two new jumo vector entry points are defined, 
a new sector translation subroutine is included, and a disk 
characteristics table must be defined. The skeletal form of these 
changes are found in the program shown below. 


is org 4988h 

23 maclip diskdef 

3: jmp boot 

4: ; owe 

53 jmp listst ;list status 

6: jmp sectran ;sector translate 

7: disks 4 

os 5 large capacity drive 

9: bpb equ 16*1924 ;bytes per block 

10: rpb egu bpb/128 ;records per block 

ll: maxb equ 65535/rpbd ;max block number 
12: diskdef @,1,58,3,bpb,maxb+1,128,8,2 
133 diskdef 1,1,58,,bopb,maxb+1,128,6,2 

14: diskdef 2,9 

Lois diskdef 3,1 

16: ; 

l7: boots ret ;nop 

le: ; 

19: listst: xra a ;nop 

20: ret 

2l: + 

22: seldsk: 

23% :;drive number inc 

24: lxi h,@ 70008 in hl produces select error 
253 mov a,c s;a is disk number J ... ndisks-l 
26:3 cpi ndisks ;less than ndisks? 

27% rnc sreturn with HL = 0808 if not 
283 3 proper disk number, return dpb element address 
293 mMOv 1,¢ 

30: dad h 2*2 
31% dad h 3*4 
323 dad h 2 *8 

333 dad h :*16 
34: 1xi d,dpbase 
35: dad d ;HL=.dpb 
36: ret 

373 3 

38: selsec: 

393 ;sector number inc 

40: Lxi h,sector 

4l: mov mi, ¢ 

42: ret 

43: ¢ 

44: sectran: 

45: stranslate sector BC using table at DE 
46: xchg ;HL = .tran 

47: dad b ;Single precision tran 
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48: ; dad b again if double precision tran 


49: mov l,m ;only low byte necessary here 
52's* 3 fill botn H and L if double orecision tran 
Sit ret ;HL = ??ss 

52: -s 

53:.sector: ds 1 

54: endef 

eI end 


Referring to the program shown above, lines 3-6 represent the 
BIOS entry vector of 17 elements (version 1.4 defines only 15 jump 
vector elements). The last two elements provide access to the 
"LISTST" (List Status) entry point for DESPOOL. The use of this 
particular entry point is defined in the DESPOOL documentation, and is 
no different than the previous 1.4 release, It should be noted that 
the 1,4 DESPOOL program will not operate under version 2.0, but an 
update version will be available from Digital Research in the near 
future, 


The “SECTRAN" (Sector Number Translate) entry shown in the jump 
vector at line 6 provides access to a BIOS-resident sector translation 
Subroutine. This mechanism allows the user to specify the sector skew 
factor and translation for a particular disk system, and is described 
below, 


A macro library is shown in the listing, called DISKDEF, 
included on line 2, and referenced in 12-15. Although it is not 
necessary to use the macro liprary, it greatly simplifies tthe disk 
definition process. You must have access to the MAC macro assembler, 
of course, to use the DISKDEF facility, while tthe macro library is 
included with all CP/M 2.0 distribution disks. (See the CP/M 2.9 
Alteration Guide for formulas which you can use to hand-code the 
tables produced by the DISKDEF library). 


A BIOS disk definition consists of the following sequence of 
macro statements: 


MACLIB DISKDEF 
DISKS n 
DISKDEF 9Q,... 
DISKDEF 1,... 
DISKDEF n-1l 


ENDEF 


where the MACLIB statement loads the DISKDEF.LIB file (on the same 
disk as your BIOS) into MAC's internal tables, The DISKS macro call 
follows, which specifies the number of drives to be configured with 
your system, where n is an integer in the range 1 to 16. A series of 
DISKDEF macro calls then follow which define the characteristics of 
each logical disk, @ through n-l (corresponding to logical drives A 
through P). Note that the DISKS and DISKDEF macros generate in-line 
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fixed data tables, and thus must be placed in a non-executable portion 
of your BIOS, typically directly following the BIOS jump vector. 


The remaining portion of your BIOS is defined following the 
DISKDEF macros, with the ENDEF macro call immediately preceding the ) 
END statement, The ENDEF (End of Diskdef) macro generates’ the 
necessary uninitialized RAM areas which are located above your BIOS, 


The form of the DISKDEF macro call is 


DISKDEF dn,fsc,lisc,[skf],bls,dks,dir,cks,ofs, [9] 


where 
dn is the logical disk number, @# to n-l 
fsc is the first physical sector number (@ or 1) 
lsc is the last sector number 
skf is the optional sector skew factor 
bis is the data allocation block size 
dir is the number of directory entries 
cks is the number of "checked" directory entries 
ofs is the track offset to logical track #0 


[8] is an optional 1.4 compatibility flag 


The value “dn" is the drive number being defined with this DISKDEF 
macro invocation, The "“fsc" parameter accounts for differing sector 
numbering systems, and is usually @ or l. The “lsc" is the last 
numbered sector on a track. When present, the "skf" parameter defines 
the sector skew factor which is used to create a sector translation 
table according to the skew. If the number of sectors is less’ than 
256, a single-byte table is created, otherwise each translation table 
element occupies two bytes. No translation table is created if the 
skf parameter is omitted (or equal to @). The “bls"“ parameter 
specifies the number of bytes allocated to eacn data block, and _ takes 
on the values 1024, 2048, 4896, 8192, or 16384, Generally, 
performance increases with larger data block sizes since there are 
fewer directory references and logically connected data records are 
physically close on the disk. Further, each directory entry addresses 
more data and the BIOS-resident ram space is reduced, The “dks" 
specifies the total disk size in "bls“ units. That is, if the bls = 
2048 and dks = 1908, then the total disk capacity is 2,048,000 bytes. 
If dks is greater than 255, then the block size parameter bls must be 
greater than 16924, The value of "dir" is the total number of 
directory entries which may exceed 255, if desired, The “cks"“ 
Parameter determines the number of directory items to check on each 
directory scan, and is used internally to detect changed disks during 
system operation, where an intervening cold or warm start has not 
occurred (when this situation is detected, CP/M automatically marks 
the disk read/only so that data is not subsequently destroyed). 
Normally the value of cks = dir when the media is easily changed, as 
is the case with a floppy disk subsystem, If the disk is permanently 
mounted, then the value of cks is typically #@, since the probability 
of changing disks without a restart is guite low. The "“ofs" value 
determines the number of tracks to skip when this particular drive is 
addressed, which can be used to reserve additional operating system 
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space or to simulate several logical drives on a single large capacity 
physical drive. Finally, the [@] parameter is included when file 
compatibility is required with versions of 1.4 which have been 
modified for higher density disks. This parameter ensures that only 
16K is allocated for each directory record, as was the case for 
previous versions, Normally, this parameter is not included. 


For convenience and economy of table space, the special form 
DISKDEF : | 


gives disk i the same characteristics as a previously defined drive }j. 
A standard four-drive single density system, which is compatible with 
version 1.4, is defined using the following macro invocations: 


DISKS 4 
DISKDEF 9,1,26,6,1024,243,64,64,2 
DISKDEF | 
DISKDEF 2 
DISKDEF 3 


ENDEF 


with all disks having the same parameter values of 26 sectors per 
track (numbered 1 through 26), with 6 sectors skipped between each 
access, 1024 bytes per data block, 243 data blocks for a total of 243k 
byte disk capacity, 64 checked directory entries, and two operating 
system tracks. 


The definitions given in the program shown above (lines 12 
through 15) provide access to the largest disks addressable by CP/M 
2.0. All disks have identical parameters, except that drives @ and 2 
skip three sectors on every data access, while disks 1 and 3 access 
each sector in sequence as the disk revolves (there may, however, be a 
transparent hardware skew factor on these drives). 


The DISKS macro generates n "disk header blocks," starting at 
address DPBASE which is a label generated by the macro, Each disk 
header block contains sixteen bytes, and correspond, in sequence, to 
each of the defined drives. In the four drive standard system, for 
example, the DISKS macro generates a table of the form: 


DPBASE EQU $ 

DPEO: DW XLTO ,9000H,0000H,0000H,DIRBUF,DPBd,CSVG,ALVO 
DPE1: DW XLT# ,0000H,0090H,0900H,DIRBUF,DPB9,CSV1,ALV1 
DPE2: DW XLT@ ,06000H,0000H,0000H,DIRBUF,DPBY,CSV2,ALV2 
DPE3: DW XLTO ,0000H,0000H,0000H,DIRBUF,DPBS,CSV3,ALV3 


where the DPE (disk parameter entry) labels are included for reference 
purposes to show the beginning table addresses for each drive 9Q 
through 3. The values contained within the disk parameter header are 
described in detail in the CP/M 2.@ Alteration Guide, but basically 
address. the translation vector for the drive (all reference XLTO, 
which is the translation vector for drive 0 in the above example), 
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followed by three 16-bit "“scratch" addresses, followed by the 
directory buffer address, disk parameter block address, check vector 
address, and allocation vector address, The check and allocation 
vector addresses are generated by the ENDEF macro in the ram area 
following the BIOS code and tables, 


The SELDSK function is extended somewhat in version 2.90. In 
particular, the selected disk number is passed to the BIOS in register 
C, as before, and the SELDSK' subroutine performs the appropriate 
software or hardware actions to select the disk. Version 2.9, 
however, also requires the SELDSK subroutine to return the address of 
the selected disk parameter header (DPE®, DPEl, DPE2, or DPE3, in the 
above example) in register dL. If SELDSK returns the value HL = 
Q2000H, then the BDOS assumes the disk does not exist, and prints a 
select error mesage at the terminal. Program lines 22 through 36 give 
a sample CP/M 2.@ SELDSK subroutine, showing only the disk parameter 
header address calculation, 


The subroutine SECTRAN is also included in version 2.9 which 
performs the actual logical to physical sector translation. In 
earlier versions of CP/M, the sector translation process was a part of 
the BDOS, and set to skip six sectors between each read, Due 
differing rotational speeds of various disks, the translation function 
has become a ovart of the BIOS in version 2.6. Thus, the BDOS sends 
sequential sector numbers to SECTRAN, starting at sector number 4@, 
The SECTRAN subroutine uses the sequential sector number to produce a 
translated sector number which is returned to the BsDOS. The BDOS 
subsequently sends the translated sector number to SELSEC before the 
actual read or write is verformed. Note that many controllers have 
the capability to record the sector skew on the disk itself, and thus 
there is no translation necessary, In this case, the "skf" parameter 
is omitted in the macro call, and SECTRAN simply returns the same 
value which it receives. The table ‘shown below, for example, is 
constructed when the standard skew factor skf = 6 is specified in the 
DISKDEF macro call: 


XLT@: DB 1,97 eh3 219 ,25,5911,172235329215,21 
DB 2,8,14,26,26,6,12,18,24,4,108,16,22 


If SECTRAN is required to translate a sector, then the following 
process takes place. The sector to translate is received in register 
pair BC. Only the C register is significant if the sector value does 
not exceed 255 (B = @®@ in this case). Register pair DE addresses’ the 
sector translate table for this drive, determined by a previous call 
on SELDSK, corresponding to the first element of a disk parameter 
header (XLT@ in the case shown above). The SECTRAN subroutine then 
fetches the translated sector number by adding the input sector number 
to the base of the translate table, to get the indexed translate table 
address (see lines 46, 47, and 48 in the above program). The value at 
this location is then returned in register L. Note that if the number 
of sectors exceeds 255, the translate table contains 16-bit elements 
whose value must be returned in HL, 


Following the ENDEF macro call, a number of uninitialized data 
areas are defined, These data areas need not be a part of the BIOS 
(All Information Contained Herein is Proprietary to Digital Research.) 
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which is loaded upon cold start, but must be available between the 
BIOS and the end of memory. The size of the uninitialized RAM area is 
determined by EQU statements generated by the ENDEF macro. Fora 
standard four-drive system, the ENDEF macro might vroduce 


4C72 = BEGDAT EQU $ 
(data areas) 
4DB0 = ENDDAT EQU $ 
813C = DATSIZ EQU $-BEGDAT 


which indicates that uninitialized RAM begins at location 4C72H, ends 
at 4DBWH-1, and occupies J13CH bytes. You must ensure that these 
addresses are free for use after the system is loaded, 


CP/M 2.8 is also easily adapated to disk subsystems whose sector 
size is a multiple of 128 bytes, Information is provided by the BDOS 
On sector write operations which eliminates the need for pre-read 
operations, thus allowing plocking and deblocking to take place at the 
BIOS level. 


See the “CP/M 2.8 Alteration Guide” for additional details 
concerning tailoring your CP/M system to your particular hardware, 


(All Information Contained Herein is Proprietary to Digital Research.) 
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Lie ED TUTORIAL 
1.1. Introduction to ED. 


ED is the context editor for CP/M, and is used to create 
and alter CP/M source files. ED is initiated in CP/M by 


typing 


<filename> 
ED 
<filename>.<filetype> 


In general, ED reads segments of the source file given by 
<filename> or <filename> . <filetype> into central memory, 
where the file is manipulated by the operator, and subse- 
quently written back to disk after alterations. If the 
source file does not exist before editing, it is created by 
ED and initialized to empty. The overall operation of ED 
is shown in Figure l. 


1.2. ED Operation 


ED operates upon the source file, denoted in Figure l 
by x.y, and passes all text through a memory buffer where 
the text can be viewed or altered (the number of lines which 
can be maintained in the memory buffer varies with the line 
length, but has a total capacity of about 6000 characters 
in a 16K CP/M system). Text material which has been edited 
is written onto a temporary work file under command of the 
Operator. Upon termination of the edit, the memory buffer 
is written to the temporary file, followed by any remaining 
(unread) text in the source file. The name of the original 
file is changed from x.y to x.BAK so that the most recent 
previously edited source file can be reclaimed if necessary 
(see the CP/M commands ERASE and RENAME). The temporary 
file is then changed from x.$$$ to x.y which becomes the 
resulting edited file. 

The memory buffer is logically between the source file 
and working file as shown in Figure 2. 


1.3. Text Transfer Functions 


Given that n is an integer value in the range 0 through 
65535, the following ED commands transfer lines of text 
from the source file through the memory buffer to the tem- 
porary (and eventually final) file: 


Figure 1. Overall ED Operation 


Source 
Libraries 


Source Append 


File 


X.Y 


Insert 
(I) 


Note: the ED program accepts both lower and upper case ASCII 
characters as input from the console. Single letter commands 
can be typed in either case. The U command can be issued to 

cause ED to translate lower case alphabetics to upper. case as 
characters are filled to the memory buffer from the console. 

Characters are echoed as typed without translation, however. 
The -U commarid causes ED to revert to "no translation" mode. 

ED starts with an assumed -U in effect. 


Figure 2. Memory Buffer Organization 
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Figure 3. Logical Organization of Memory Buffer 


Memory Buffer 


<cr><lf> 


<or><1f> 


current 


line CL <er><l£> 


last 
dine 


nA<cr>* append the next n unprocessed source 
lines from the source file at SP to 
the end of the memory buffer at MP. 


Increment SP and MP by n. 


nW<cr> - write the first n lines of the memory 
buffer to the temporary file free space. 
Shift the remaining lines n+l through 
MP to the top of the memory buffer. 
Increment TP by n. 


E<xcr> - end the edit. Copy all buffered text 
to temporary file, and copy all un- 
processed source lines to the temporary 
file. Rename files as described 
previously. 


H<cr> - move to head of new file by performing 
automatic E command. Temporary file 
becomes the new source file, the memory 
buffer is emptied, and a new temporary 
file is created (equivalent to issuing 
an E command, followed by a reinvocation 
of ED using x.y as the file to edit). 


O<cr> - return to original file. The memory 
buffer is emptied, the temporary file 
id deleted, and the SP is returned to 
position 1 of the source file. The 
effects of the previous editing commands 
are thus nullified. 


Q<cr> - quit edit with no file alterations, 
return to CP/M. 


There are a number of special cases to consider. If the 
integer n is omitted in any ED command where an integer is 
allowed, then 1 is assumed. Thus, the commands A and W append 
one line and write 1 line, respectively. In addition, if a 
pound sign (#) is given in the place of n, then the integer 
65535 is assumed (the largest value for n which is allowed). 
Since most reasonably sized source files can be contained 
entirely in the memory buffer, the command #A is often issued 
at the beginning of the edit to read the entire source file 
to memory. Similarly, the command #W writes the entire buffer 
to the temporary file. Two special forms of the A and W 


*<cr> represents the carriage-return key 


commands are provided as a convenience. The command 0A fills 
the current memory buffer to at least half-full, while OW 
writes lines until the buffer is at least half empty. It 
should also be noted that an error is issued if the memory 
buffer size is exceded. The operator may then enter any 
command (such as W) which does not increase memory require- 
ments. The remainder of any partial line read during the 
overflow will be brought into memory on the next successful 
append. 


1.4. Memory Buffer Organization 


The memory buffer can be considered a sequence of source 
lines brought in with the A command from a source file. The 
memory buffer has an associated (imaginary) character pointer 
CP which moves throughout the memory buffer under command of 
the operator. The memory buffer appears logically as shown 
in Figure 3 where the dashes represent characters of the 
source line of indefinite length, terminated by carrigage- 
return (<cr>) and line-feed (<lf>) characters, and 
represents the imaginary character pointer. Note that the 
CP is always located ahead of the first character of the 
first line, behind the last character of the last line, or 
between two characters. The current line CL is the source 
bes. pereneeesre mel : 
line which contains the CP. 


1.5. Memory Buffer Operation 


Upon initiation of ED, the memory buffer is empty (ie, 
CP is both ahead and behind the first and last character). 
The operator may either append lines (A command) from the 
source file, or enter the — directly from the console 
with the insert command 


L<er> 


ED then accepts any number of input lines, where each line 
terminates with a <cr> (the <lf> is supplied automatically), 
until a control-z (denoted by tz is typed by the operator. 
The CP is positioned after the last character entered. The 
sequence 


Tser> 

NOW IS THE<cr> 
TIME FOR<cr> 

ALL GOOD MEN<cr> 
+z 


leaves the memory buffer as shown below 


NOW IS THE<cr><l1f> 
TIME FOR<cr><1f> 


ALL GOOD MEN<cr><lf> a 


Various commands can then be issued which manipulate the CP 

or display source text in the vicinity of the CP. The 
commands shown below with a preceding n indicate that an 
optional unsigned value can be specified. When preceded by 

+, the command can be unsigned, or have an optional preceding 
plus or minus sign. As before, the pound sign (#) is replaced 
by 65535. If an integer n is optional, but not supplied, 

then n=l is assumed. Finally, if a plus sign is optional, 

but none is specified, then + is assumed. 


+B<cr> - move CP to beginning of memory buffer 


a 


tnC<cr> - move CP by tn characters (toward front 
of buffer if +), counting the <cr><l1f> 
as two distinct characters 


tnD<cr> - delete n characters ahead of CP if plus 
and behind CP if minus. 


e 


tnK<cr> - kill (ie remove) tn lines of source text 
using CP as the current reference. If 
CP is not at the beginning of the current 
line when K is issued, then the charac- 
ters before CP remain if + is specified, 
while the characters after CP remain if - 
is given in the command. 


tnL<cr> - if n=0 then move CP to the beginning of 
the current line (if it is not already 
there) if n40 then first move the. CP to 
the beginning of the current line, and 
then move it to the beginning of the 
line which is n lines down (if +) or up 
(if -). The CP will stop at the top or 
bottom of the memory buffer if too large 
a value of n is specified. 


tnT<cr> - If n=0 then type the contents of the 

current line up to CP. If n=l then 
‘type the contents of the current line 
from CP to the end of the line. If 
n>l then type the current line along 
with n-l lines which follow, if + 
is specified. Similarly, if n>1l and 

‘ - is given, type the previous n lines, 
up to the CP. The break key can be 
depressed to abort long type-outs. 


tn<cr> - equivalent to tnLT, which moves up or 
down and types a single line 


1.6. Command Strings 


Any number of commands can be typed contiguously (up to 
the capacity of the CP/M console buffer), and are executed 
only after the <cr> is typed. Thus, the operator may use 
the CP/M console command functions to manipulate the input 
command: 


Rubout remove the last character 
Control-U delete the entire line 
Control-C re-initialize the CP/M System 
Control-E return carriage for long lines 


without transmitting buffer 
(max 128 chars) 


Suppose the memory buffer contains the characters shown 
in the previous section, with the CP following the last 
character of the buffer. The command strings shown below 
produce the results shown to the right 


Command String Effect Resulting Memory Buffer 
1. B2T<cr> move to beginning Gp Now IS THE<cr><lf> 
of buffer and type 
to ade TIME FOR<cr><1f> 
"NOW IS THE ALL GOOD MEN<cr><1£>. 
TIME FOR" 
2. 5C0T<cr> move CP 5 charac- NOW Tven§ THE<cr><1f> 
ters and type the 


beginning of the 
line 
1" NOW I " 


3. 2L-T<cr> move two lines down NOW IS THE<cr><lf> D 
and type previous TIME FOR<cr><1£> 


line 
"TIME FOR" ALL GOOD MEN<cr><l1f> 
4. -L#K<cr> move up one line, Now IS ne 
delte 65535 lines 
which follow 
5. I<er> insert two lines NOW IS THE<cr><lf> 
TIME TO<cr> of text 
INSERT<cr> TIME TO<cr><lf> 


tz Se ee a de 


6. -2L#T<cr> move up two lines, Now IS ee a 


and type 65535 
lines ahead of CP TIME TO<cr><1f> 


"NOW IS THE" INSERT<cr><1lf> 
7s *@E> move down one line NOW IS THE<cr><lf> 
and type one line 
"INSERT" TIME TO<cr><lf> (ep) 
INSERT<cr><lf> 


1.7. Text Search and Alteration 


ED also has a command which locates strings within the 
memory buffer. The command takes the form 


<cr> 
nF he es { rn 


where c, through cy, represent the characters to match followed 
by either a <cr> or control -z . ED starts at the current 
position of CP and attempts to match all k characters. The 
match is attempted n times, and if successful, the CP is 

moved directly after the character c,. If the n matches are 
not successful, the CP is not moved From its initial position. 
Search strings can include tl (control-l), which is replaced 
by the pair of symbols <cr><lf>. 


*The control-z is used if additional commands will be typed a 
following the tz. 


The following commands illustrate the use of the F 


command : 


Command String Effect 


1. B#T<cr> move to beginning 
and type entire 


buffer 


find the end of 
the string "S T" 


2. FS T<cx> 


find the next "I" 
and type to the 
CP then type the 
remainder of the 
current line: 
"TIME FOR" 


3. FIt+z0TT 


Resulting Memory Buffer 


enn IS THE<cr><lf> 
TIME FOR<cr><l1f> 
ALL GOOD MEN<cr><lf> 


NOW IS ‘oo 


NOW IS THE<cr><lf> 


TT ep)"* FOR<cr><lf> 
ALL GOOD MEN<cr><lf> 


An abbreviated form of the insert command is also allowed, 
which is often used in conjunction with the F command to make 


simple textual changes. 


I CyCo-e- ctz 


c,c c._<¢r> 
t n 


Toe 


where cj through c, are characters to insert. 
the characters cj through 
the CP, and the CP is 

The action is the same. 


tion string is terminated by a tz, 
Cy, are inserted directly following 
moved directly after character c,. 


The form is: 


or 


If the inser- 


if the command is followed by a <cr> except that a <cr><lf> 
is automatically inserted into the text following character 
Cy- Consider the following command sequences as examples 


of the F and I commands: 


Command String Effect 


BITHIS IS tz<cr> Insert "THIS IS " 
at the beginning 


of the text 


Resulting Memory Buffer 


THIS IS ‘a THE <cr><lf> 


TIME FOR<cr><lf> 
ALL GOOD MEN<cr><1lf> 


FTIME+ 2-4DIPLACEtz<cr> THIS IS NOW THE<cr><lf> ® : 


find "TIME" and delete PLACE FOR<cr><1£> 
it; then insert "PLACE" ALL GOOD MEN<cr><l1f£> 
3FO+2-3D5DICHANGES ¢<cr> THIS IS NOW THE <cr><l1f> 


find third occurrence PLACE FOR<cr><1f> 

of "O" (ie the second ALL CHANGES fopy CE? Sh EP 
"O" in GOOD), delete 

previous 3 characters; 

then insert "CHANGES" 


-8CISOURCE<cr> move back 8.characters THIS IS NOW THE<cr><1l£> 
a ara a cle a PLACE FOR<cr><1£> 
ALL SOURCE<cr><lf> 


ep) CHANCES Ger she? 


ED also provides a single command which combines the F and 
I commands to perform simple string substitutions. The command 
takes the form 


<cr> 
ns ee ts dj doe--d { ko 


and has exactly the same effect as applying the command string 


- <cr> 
Foc eed hz kDId,d5---d, { 


1°2 k 4z, 


a total of n times. That is, ED searches the memory buffer 
starting at the current position of CP and successively sub- 
stitutes the second string for the first string until the 
end of buffer, or until the substitution has been performed 
n times. 

As a convenience, a command similar to F is provided by 
ED which automatically appends and writes lines as the search 
proceeds. The form is 


er 


which searches the entire source file for the nth occurrence 
of the string cjc3...c,h (recall that F fails if the string 
cannot be found in the current buffer). The operation of the 
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ww command is precisely the same as F except in the case that 
the string cannot be found within the current memory buffer. 
In this case, the entire memory contents is written (ie, an 
automatic #W is issued). Input lines are then read until 
the buffer is at least half full, or the entire source file 
is exhausted. The search continues in this manner until the 
string has been found n times, or until the source file has 
been completely transferred to the temporary file. 

A final line editing function, called the juxtaposition 
command takes the form 


<cer> 
nJ C)Co++-C, tz djd.--d tz ss las taal (3) 


with the following action applied n times to the memory buffer: 
search from the current CP for the next occurrence of the 
string cyc ——- If found, insert the string Aydg---, - 

and move ae © follow dm: Then delete all characters following 
CP up to (but not including) the string e),e9,-..e leaving 

CP directly after d,. If e),e9,-..e@, cannot be found, then 

no deletion is made. If the current ‘line is 


ene" IS THE TIME<cr><1lf> 


Then the command 
OW tzZWHATtztl<cr> 
Results in 


NOW WHAT GD] <cr><lf> 


(Recall that tl represents the pair <cr><lf> in search and 
substitute strings). 

It should be noted that the number of characters allowed 
by ED in the F,S,N, and J commands is limited to 100 symbols. 


1.8. Source Libraries 
ED also allows the inclusion of source libraries during 


the editing process with the R command. The form of this 
command is f 


Me 


hk t,2 


1 2°°t,t2 or 


R £,£ 


1 9° £,<er> 


where f,)f2..f, is the name of a source file on the disk with 
as assumed filetype of 'LIB'. ED reads the specified file, 
and places the characters into the memory buffer after CP, 
in a manner similar to the I command. Thus, if the command 


RMACRO<cr> 


is issued by the operator, ED reads from the file MACRO.LIB 
until the end-of-file, and automatically inserts the charac- 
ters into the memory buffer. 


1.9. Repetitive Command Execution 


The macro command M allows the ED user to group ED com- 
mands together for repeated evaluation. The M command takes 


the form: 
<er> 


where C)C9.--C, represent a string of ED commands, not inclu- 
ding another M command. ED executes the command string n 
times if n>l. If n=0 or 1, the command string is executed 
repetitively until an error condition is encountered (e.g., 
the end of the memory buffer is reached with an F command). 
As an example, the following macro changes all occur- 
rences of GAMMA to DELTA within the current buffer, and 
types each line which is changed: 


MFGAMMAt z-5DIDELTAtz0OTT<cr> 


or equivalently 


MSGAMMAtZDELTA*tz0OTT<cr> 
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€ii 2. ED ERROR CONDITIONS 


On error conditions, ED prints the last character read 
before the error, along with an error indicator: 


? unrecognized command 


> memory buffer full (use one of 
the commands D,K,N,S, or W to 
remove characters), F,N, or S 
strings too long. 


# cannot apply command the number 
of times specified (e.g., in 
F command) 


(@) cannot open LIB file in R 
command 


Cyclic redundancy check (CRC) information is written with 
each output record under CP/M in order to detect errors on 
subsequent read operations. If a CRC error is detected, CP/M 
will type 


rail PERM ERR DISK d 


where d is the currently selected drive (A,B,...). The oper- 
ator can choose to ignore the error by typing any character 
at the console (in this case, the memory buffer data should 
be examined to see if it was incorrectly read), or the user 
can reset the system and reclaim the backup file, if it 
exists. The file can be reclaimed by first typing the con- 
tents of the BAK file to ensure that it contains the proper 
information: 


TYPE x. BAK<cr> 


where x is the file being edited. Then remove the primary 
file: 


ERA x.y<cr> 
and rename the BAK file: 
REN x. y=x. BAK<cr> 


The file can then be re-edited, starting with the previous 
€) version. 
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3. CONTROL CHARACTERS AND COMMANDS 


The following table summarizes the control characters 
and commands available in ED: 


Control Character Function 

te system reboot 

te ‘physical <cr><1lf> (not 
actually entered in 
command) 

Ai logical tab (cols 1,8, 
L5 pieces’) 

41 logical <cr><lf> in 
search and substitute 
strings 

4u line delete 

4z string terminator 

rubout character delete 
break discontinue command 


(e.g., stop typing) 
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Command Function 


nA append lines 

+B begin bottom of buffer 
+nC move character positions 
+nD delete characters 

E end edit and close files 


(normal end) 


nF find string 
H end edit, close and reopen 
files 
5 insert characters 
nJ place strings in juxtaposition 
+nK kill lines 
+nL move down/up lines 
nM macro definition 
nN find next occurrence with 
autoscan 
O return to original file 
+nP move and print pages 
Q quit with no file changes 
R read library file 
nS substitute strings 
+nT type lines 
ty translate lower to upper case if U, 
no translation if -U 
nW write lines 
nZ sleep 
+n<cr> move and type (+nLT) 


Le 


Appendix A: ED 1.4 Enhancements 


The ED context editor contains a number of commands which enhance its 
usefulness in text editing. The improvements are found in the addition of line numbers, 
free space interrogation, and improved error reporting. 


The context editor issued with CP/M 1.4 produces absolute line number prefixes 
when the "V" (Verify Line Numbers) command is issued. Following the V command, 
the line number is displayed ahedd of each line in the format: 


hnnnn: 


where nnnnn is an absolute line number in the range 1 to 65535, If the memory buffer 
is empty, or if the current line is at the end of the memory buffer, then nnnnn appears 
as 5 blanks. 


. The user may reference an absolute line number by preceding any command by 
a number followed by @ colon, in the same format as the line number display. In this 
ease, the ED program moves the’ current line reference to the absolute line number, 
if the line exists in the current memory buffer. Thus, the command 


345:T 


is interpreted as "move to absolute line 345, and type the line.” Note that absolute 
line numbers are produced only during the editing process, and are not recorded with 
the file. In particular, the line numbers will change following a deleted or expanded 
section of text. 


The user may also reference an absolute line number as a backward or forward 
distance from the current line by preceding the absolute line number by a colon. Thus, 
the command 


:400T 


is interpreted as "type from the current line number through the line whose absolute 
number is 469." Combining the two line reference forms, the command 


345::409T 
for example, is interpreted as "move to absolute line 345, then type through absolute 
line 469." Note that absolute line references of this sort can precede any of the 
standard ED commands. 


A special case of the V command, "$V", prints the memory buffer statisties in 
the form: 


free/total 


where "free" is the number of free bytes in the memory buffer (in decimal), and "total" 
is the size of the memory buffer. 


ED 1.4 also includes a "block move" facility implemented through the "X" (Xfer) 
command. The form 


nX 
transfers the next n lines from the current line to a temporary file called 
X$$$$$$$.LIB 


which is active only during the editing process. In general, the user can reposition 
the current line reference to any portion of the source file and transfer lines to the 
temporary file. The transferred line accumulate one after another in this file, and 
ean be retrieved by simply typing: 


R 


which is the trivial case of the library read command. In this case, the entire 
transferred set of lines is read into the memory buffer. Note that the X command 
does not remove the transferred lines from the memory buffer, although a K command 
ean be used directly after the X, and the R command does not empty the transferred 
line file. That is, given that a set of lines has been transferred with the X command, 
they can be re-read any number of times back into the source file. The command 


ax 
is provided, however, to empty the transferred line file. 

Note that upon normal completion of the ED program through Q or E, the 
temporary LIB file is removed. If ED is aborted through ctl-C, the LIB file will exist 
if lines have been transferred, but will generally be empty (a subsequent ED invocation 
will erase the temporary file). 

Due to common typographical errors, ED 1.4 requires several potentially disas- 
terous commands to be typed as single letters, rather than in composite commands. 
The commands 

E (end), H (head), O (original), Q (quit) 
must be typed as single letter commands. 

ED 1.4 also prints error messages in the form 


BREAK "x" AT ¢ 


where x is the error character, and ¢ is the command where the error occurred. 
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1. INTRODUCTION 


The standard CP/M system assumes operation on an Intel MDS-3800 
microcomputer development system, but is designed so that the user can 
alter a specific set of subroutines which define the hardware 
operating environment. In this way, the user can produce a diskette 
which operates with any IBM-3741 format compatible drive controller 
and other peripheral devices, 


Altnough standard CP/M 2.8 is configured for single density floppy 
disks, field-alteration features allow adaptation to a wide variety of 
disk subsystems from single drive minidisks through high-capacity 
“hard disk" systems. In order to simplify the following adaptation 
process, we assume that CP/M 2.0 will first be configured for single 
density floppy disks where minimal editing and debugging tools are 
available. If an earlier version of CP/M is available, the 
customizing process is eased considerably. In this latter case, you 
may wish to briefly review the system generation process, and skip to 
later sections which discuss system alteration for non-standard disk 
systems, 


In order to achieve device independence, CP/M is separated into 
tnree distinct modules: 


BIOS - pasic I/O system which is environinent dependent 

BDOS - basic disk operating system which is not dependent 
upon the hardware configuration 

CCP - the console command processor which uses the BDOS 


Of these modules, only the BIOS is dependent upon the particular 
nardware., That is, the user can “patch” the distribution version of 
CP/M to provide a new BIOS which provides a customized interface 
between the remaining CP/M modules and the user's own hardware system, 
The purpose of this document is to provide a step-by-step procedure 
for patching your new BIOS into CP/M, 


If CP/M is being tailored to your computer system for the first 


time, the new BIOS requires some relatively simple software 
development and testing. The standard BIOS is listed in Appendix B, 
and can be used as a model for the customized package. A skeletal 


version of the BIOS is’ given in Appendix C which can serve as the 
basis for a modified BIOS. In addition to the BIOS, the user must 
write a simple memory loader, called GETSYS, which brings the 
operating system into memory. In order to patcn the new BIOS’ into 
CP/M, the user must write the reverse of GETSYS, called PUTSYS, which 
places an altered version of CP/M back onto the diskette. PUTSYS can 
be derived from GETSYS by changing the disk read commands into disk 
write commands. Sample skeletal GETSYS and PUTSYS programs are 
described in Section 3, and listed in Appendix D. In order to make 
the CP/M system work automatically, the user must also supply a cold 
Start loader, similar to the one provided with CP/M (listed in 
Appendices A and B). A skeletal form of a cold start loader is given 
in Appendix E which can serve as a model for your loader. 
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2. FIRST LEVEL SYSTEM REGENERATION 


The procedure to follow to patcn the CP/M system is given below in 
several steps. Address references in each step are shown with a 
following "H“ which denotes the hexadecimal radix, and are given for a 
20K CP/M system, For larger CP/M systems, add a “bias“” to each 
address which is shown with a “+b" following it, where b is equal to 
tne memory size - 20K. Values for b in various standard memory sizes 
are 


24K: b = 24K - 20K = 4K = 1000H 
32K: 0 = 32K - 20K = 12K = 3060H 
40K: b = 40K - 20K = 20K = 5000H 
48K: b = 48K - 20K = 28K = 7600H 
56K: b = 56K - 26K = 36K = 9000H 
62K: b = 62K - 20K = 42K = A8O0H 
64K: b = 64K - 20K = 44K = BOOOH 


Note: The standard distribution version of CP/M is set for 
operation within a 20K memory system. Therefore, you must first bring 
up the 2@K CP/M system, and then configure it for your actual memory 
size (see Second Level System Generation). 


(1) Review Section 4 and write a GETSYS program which reads’ the 
first two tracks of a diskette into memory. The data from the diskette 
must begin at location 338H. Code GETSYS so that it starts at 
location 100H (pase of the TPA), as shown in the first oart of 
Appendix d. 


(2) Test the GETSYS program by reading a blank diskette into 
memory, and check to _ see that the data has been read properly, and 
that the diskette has not been altered in any way by the GETSYS 
program, 


(3) Run the GETSYS program using an initialized CP/M diskette to 
see if GETSYS loads CP/M starting at 3380H (the operating system 
actually starts 128 bytes later at 340@0H). 


(4) Review Section 4 and write the PUTSYS program which writes 
memory starting at 338#@H back onto the first two tracks of the 
diskette, The PUTSYS program should be located at 20@H, as shown in 
the second part of Appendix D. 


(5) Test the PUTSYS program using a blank uninitialized diskette 
by writing a portion of memory to the first two tracks; clear memory 
and read it back using GETSYS. Test PUTSYS completely, since this 
program will be used to alter CP/M on disk. 


(6) Study Sections 5, 6, and 7, along with the distribution 
version of the BIOS given in Appendix B, and write a simple version 
which performs a similar function for the customized environment. Use 
the program given in Appendix C as a model. Call this new BIOS by the 
name CBIOS (customized BIOS). Implement only the primitive disk 
operations on a single drive, and simple console input/output 
functions in this phase, 
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(7) Test CBIOS completely to ensure that it properly verforms 
console character I/O and disk reads and writes. Be especially 
careful to ensure that no disk write operations occur accidently 
during read operations, and check that the proper track and sectors 
are addressed on all reads and writes, Failure to make these checks 
may cause destruction of the initialized CP/M system after it is 
patched, 


(8) Referring to Figure 1 in Section 5, note that the B8I10S is 
placed between locations 4A0@0H and 4FFFH. Read the CP/M system using 
GETSYS and replace the BIOS segment by the new CBIOS developed in step 
(6) and tested in step (7). This replacement is done in the memory of 
the machine, and will be placed on the diskette in the next step. 


(9) Use PUTSYS to olace the patched memory image of CP/M onto the 
first two tracks of a blank diskette for testing. 


(10) Use GETSYS to bring the copied memory image from the test 
diskette back into memory at 3380H, and check to ensure that it has 
loaded back properly (clear memory, if possible, before the load). 
Upon successful load, brancn to the cold start code at location 4A6QH. 
The cold start routine will initialize page zero, then jumo to the CCP 
at location 3408H which will call the BDOS, which will call the CBIOS. 
The CBIOS will be asked by the CCP to read sixteen sectors on track 2, 
and if successful, CP/M will type "A>", the system prompt. 

When you make it this far, you are almost on the air. If you have 
trouble, use whatever debug facilities you have available to trace and 
breakpoint your CBIOS, 


(11) Upon completion of step (10), CP/M has promoted the console 
for a command input. Test the disk write operation by typing 


SAVE 1 X.COM 
(recall that all commands must be followed by a carriage return). 
CP/M should respond with another prompt (after several disk accesses): 
A> 
If it does not, debug your disk write functions and retry. 
(12) Then test the directory command by typing 
DIR 
CP/M should respond with 
A: X COM 
(13) Test the erase command by typing 


ERA X.COM 
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CP/M should respond with the A prompt. When you make it this far, you 
should have an operational system which will only require a bootstrap 
loader to function completely. 


(14) Write a bootstrap loader which is similar to GETSYS, and 
place it on track 9%, sector 1 using PUTSYS (again using the test 
diskette, not the distribution diskette). See Sections 5 and 3 for 
more information on the bootstrap operation, 


(15) Retest the new test diskette with the bootstrap loader 
installed by executing steps (11), (12), and (13). Upnon completion of 
these tests, type a control-C (control and C keys simultaneously). The 
system should then execute a “warm start" which reboots the system, 
and types the A prompt, 


(16) At this point, you probably have a good version of your 
customized CP/M system on your test diskette. Use GETSYS to load CP/M 
from your test diskette, Remove the test diskette, place the 
distribution diskette (or a legal copy) into the drive, and use PUTSYS 
to replace the distribution version by your customized version, Do 
not make this replacement if you are unsure of your patch since this 
step destroys the system which was sent to you from Digital Research. 


(17) Load your modified CP/M system and test it by typing 
DIR 


CP/M should respond with a list of files which are provided on the 
initialized diskette. One such file should be the memory image for 
the debugger, called DDT.COM. 


NOTE: from now on, it is important that you always reboot the CP/M 
system (ctl-C is sufficient) when the diskette is removed and replaced 
by anotner diskette, unless the new diskette is to be read only. 


(18) Load and test the debugger by typing 
DDT 


(see the document "CP/M Dynamic Debugging Tool (DDT)" for operating 
procedures, You should take the time to become familiar with DDT, it 
will be your pest friend in later steps, 


(19) Before making further CBIOS modifications, practice using 
the editor (see the ED user's guide), and assembler (see the ASM 
user's guide). Then recode and test the GETSYS, PUTSYS, and CBIOS 
programs using ED, ASM, and DDT. Code and test a COPY program which 
does a sector-to-sector copy from one diskette to another to obtain 
back-up copies of the original diskette (NOTE: read your CP/M 
Licensing Agreement; it specifies your legal responsibilities when 
copying the CP/M system). Place the copyright notice 


Copyright (c), 1979 
Digital Research 
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on each copy which is made with your COPY program, 


(20) Modify your CBIOS to include the extra functions for 
punches, readers, signon messages, and so-forth, and add the 
facilities for a aaditional disk drives, if desired. You can make 
these changes with the GETSYS and PUTSYS programs which you _ have 
developed, or you can refer to the following section, which outlines 
CP/M facilities which will aid you in the regeneration process, 


You now have a good copy of the customized CP/M system. Note that 
although the CBIOS portion of CP/M which you have develoved belongs to 
you, the modified version of CP/M which you have created can be copied 
for your use only (again, read your Licensing Agreement), and cannot 
be legally copied for anyone else's use, 


It should be noted that your system remains file-compatible with all 


other CP/M systems, (assuming media compatiblity, of course) which 
allows transfer of non-proprietary software between users of CP/M, 
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3. SECOND LEVEL SYSTEM GENERATION 


Now that you have the CP/M system running, you will want to 
configure CP/M for your memory size. In general, you will first get a 
memory image of CP/M with the "MOVCPM" program (system relocator) and 
olace this memory image into a named aisk file, The disk file can then 
be loaded, examined, patched, and replaced using the debugger, and 
system generation program. For further details on the operation of 
these programs, see the "Guide to CP/M Features and Facilities" 
manual, 


Your CBIOS and BOOT can be modified using ED, and assembled using 
ASM, producing files called CBIOS.HEX and BOOT.HEX, which contain the 
machine code for CBIOS and BOOT in Intel hex format. 


To get the memory image of CP/M into the TPA configured for the 
desired memory size, give the command: 


MOVCPM xx * 


where “xx" is the memory size in decimal K bytes (e.g., 32 for 32K). 
The response will pe: 


CONSTRUCTING xxK CP/M VERS 2.8 
READY FOR “SYSGEN" OR 
“SAVE 34 CPMxx.COM" 


At this point, an image of a CP/M in the TPA configured for the 
requested memory size. The memory image is at location #@99W0H through 
227FH. (i.e., The BOOT is at @998H, the CCP is at 98@H, the BDOS 
starts at 1180H, and the BIOS is at 1F80H.) Note that the memory 
image has the standard MDS-800 BIOS and BOOT on it. It is now 
necessary to save the memory image in a file so that you can patch 
your CBIOS and CBOOT into it: 


SAVE 34 CPMxx.COM 


The memory image created by the "MOVCPM" program is offset by a 
negative bias so that it loads into the free area of the TPA, and thus 
does not interfere with the operation of CP/M in higher memory. This 
memory image can be subsequently loaded under DDT and examined or 
changed in preparation for a new generation of the system, DDT is 
loaded with the memory image by typing: 


DDT CPMxx.COM Load DDT, then read the CPM 


image 
DDT should respond with 
NEXT PC 
2300 6160 
= (The DDT prompt) 


You can then use the display and disassembly commands to examine 
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portions of the memory image between 990@H and 227FH. Note, however, 
that to find any particular address within the memory image, you must 
apply the negative bias to the CP/M address to find the actual 
address. Track #0, sector 91 is loaded to location 9@6@H (you should 
find the cold start loader at 9#9H to 97FH), track 88, sector 92 is 
loaded into 98@H (this is the base of the CCP), and so-forth through 
the entire CP/M system load. Ina 20K system, for example, the CCP 
resides at the CP/M address 3490H, but is placed into memory at 980H 
by the SYSGEN program. Thus, the negative bias, denoted by n, 
satisfies 


3400H + n = 980H, or n = 980H - 3400H 


Assuming two's complement arithmetic, n = D58@H, which can be checked 
by 


3400H + D586H = 10986H = O980H (ignoring high-order 
overflow). 


Note that for larger systems, n satisfies 
(3400H+b) + n = 98HH, Or 
n = 988H - (3490H + b), or 
n = D58@H - b. 


The value of n for common CP/M systems is given below 


memory size bias b negative offset n 
20K OOOH D580H - W98¥H = D580H 
24K 1900H D580H - 1900H = C58VH 
32K 3600H D580H - 3609H = A580H 
4 OK 5000H D580H - 5800H = 8580H 
48K 7000H D589H - 7d00H = 6580H 
5 6K 98O0H D580H - 9UUGH = 4580H 
62K A8@0H D580H - A8OWH = 2D8O6H 
64K BOOOH D580H - BO90H = 2580H 


Assume, for example, that you want to locate the address x within the 
memory image loaded under DDT in a 20K system, First type 


Hx,n Hexadecimal sum and difference 
and DDT will respond with the value of x+n (sum) and x-n (difference). 
The first number printed by DDT will be the actual memory address in 
the image where the data or code will be found, The input 


H3400,D589 


for example, will produce 9808H as the sum, which is where the CCP is 
located in the memory image under DDT. 


Use the L command to disassemble portions the BIOS located at 
(4A99H+b) -n which, when you use the H command, produces an actual 
address of 1F8@H. The disassembly command would thus be 
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L1F89 
It is now necessary to vatch in your CBOOT and CBIOS routines. The 
BOOT resides at location 9@9@¥H in the memory image. If the actual 
load address is “n"“, then to calculate the bias (m) use the command: 


H90G,n Subtract load address from 
target address, 


The second number tyved in response to the command is the desired bias 
(m). For example, if your BOOT executes at WO8HH, the command: 


H900,80 
will reply 
QI8V H88O Sum and difference in hex, 


Therefore, the bias “m“ would be 0880H. To read-in the BOOT, give the 
command: 


ICBOOT. HEX Input file CBOOT.HEX 
Then: 
Rm Read CBOOT with a bias of 
m (=9%0dH-n) 


You may now examine your CBOOT with: 
L9G 


We are now ready to replace the CBIOS. Examine the area at 1F8Q@H 
where the original version of the CBIOS resides. Then type 


ICBIOS.HEX Ready the “hex" file for loading 


assume that your CBIOS is being integrated into a 20K CP/M system, and 
thus is origined at location 4A90H. In order to properly locate the 
CBIOS in the memory image under DDT, we must apply the negative bias n 
for a 20K system when loading the hex file. This is accomplished by 


typing 
RD58vd Read the file with bias D586H 


Upon completion of the read, re-examine the area where the CBIOS has 
been loaded (use an "LI1F806" command), to ensure that is was loaded 
properly. When you are satisfied that the change has been made, 
return from DDT using a control-C or “G@" command. 


Now use SYSGEN to replace the patched memory image back onto a 


diskette (use a test diskette until you are sure of your patch), as 
shown in the following interaction 
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SYSGEN Start the SYSGEN program 
SYSGEN VERSION 2.4% Sign-on message from SYSGEN 
SOURCE DRIVE NAME (OR RETURN TO SKIP) 
Respond with a carriage return 
to skip the CP/M read operation 
since the system is already in 
memory, 
DESTINATION DRIVE NAME (OR RETURN TO REBOOT) 
Respond with "B" to write the 
new system to the diskette in 
drive B, 
DESTINATION ON B, THEN TYPE RETURN 
Place a scratch diskette in 
drive B, then type return, 
FUNCTION COMPLETE 
DESTINATION DRIVE NAME (OR RETURN TO REBOOT) 


Place the scratch diskette in your drive A, and then perform a 
coldstart to bring up the new CP/M system you have configured, 


Test the new CP/M system, and place the Digital Research copyright 
notice on the diskette, as specified in your Licensing Agreement: 


Copyright (c), 1979 
Digital Research 


4, SAMPLE GETSYS AND PUTSYS PROGRAMS 


The following program provides a framework for the GETSYS and 
PUTSYS programs referenced in Section 2. The READSEC and WRITESEC 
subroutines must be inserted by the user to read and write the 
specific sectors, 


; GETSYS PROGRAM - READ TRACKS @ AND 1 TO MEMORY AT 3380H 
; REGISTER USE 
; A (SCRATCH REGISTER) 
; B TRACK COUNT (0, 1) 
; Cc SECTOR COUNT (1,254 « 526) 
; DE (SCRATCH REGISTER PAIR) 
; HL LOAD ADDRESS 
; SP SET TO STACK ADDRESS 
START: LXI SP,3380H ;SET STACK POINTER TO SCRATCH AREA 
LXI H, 3380H ;SET BASE LOAD ADDRESS 
MVI B, 0 ;START WITH TRACK 6 
RDTRK: ;READ NEXT TRACK (INITIALLY 0) 
MVI Cig ;READ STARTING WITH SECTOR 1 
RDSEC: ;READ NEXT SECTOR 
CALL READSEC ;USER-SUPPLIED SUBROUTINE 
LXI D,128 ;MOVE LOAD ADDRESS TO NEXT 1/2 PAGE 
DAD D ;HL = HL + 128 
INR C ;SECTOR = SECTOR + 1 
MOV A,C ;CHECK FOR END OF TRACK 
CPI 27 
JC RDSEC ;CARRY GENERATED IF SECTOR < 27 
; ARRIVE HERE AT END OF TRACK, MOVE TO NEXT TRACK 
INR B 
MOV A,B ;TEST FOR LAST TRACK 
CPL 2 
JC RDTRK ;CARRY GENERATED IF TRACK < 2 


=e ose 


ARRIVE HERE AT END OF LOAD, HALT FOR NOW 
HLT 


USER-SUPPLIED SUBROUTINE TO READ THE DISK 
EADSEC: 
ENTER WITH TRACK NUMBER IN REGISTER B, 
SECTOR NUMBER IN REGISTER C, AND 
ADDRESS TO FILL IN HL 


=e se se Te bot =e 


PUSH B ;SAVE B AND C REGISTERS 
PUSH H ;SAVE HL REGISTERS 


perform disk read at this point, branch to 


label START if an error occurs 


POP H ;RECOVER HL 

POP B ;RECOVER B AND C REGISTERS 
RET ;BACK TO MAIN PROGRAM 

END START 
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Note that this program is assembled and listed in Appendix C _ for 
reference purposes, with an assumed origin of 109H. The hexadecimal 
operation codes which are listed on the left may be useful if the 
program has to be entered through your machine's front panel switches. 


The PUTSYS program can be constructed from GETSYS by changing only 
a few operations in the GETSYS program given above, as shown in 
Appendix 0D, The register pair HL become the dump address (next 
address to write), and operations upon these registers do not change 
within the program, The READSEC subroutine is replaced by a WRITESEC 
subroutine which performs the opposite function: data from address HL 
is written to the track given by register B and sector given by 
register C, It is often useful to combine GETSYS and PUTSYS into a 
single program during the test and development phase, as shown in the 
Appendix. 
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5. DISKETTE ORGANIZATION 


The sector allocation for the standard distribution version of 
cp/M is given here for reference purposes, The first sector (see 
table on the following page) contains an optional software boot 
section, Disk controllers are often set uv to bring track @, sector l 
into memory at a specific location (often location 0000H). The 
program in this sector, called BOOT, has the responsibility of 
bringing the remaining sectors into memory starting at location 
3400H+b. If your controller does not have a built-in sector load, you 
can ignore the program in track 8, sector 1, and begin the load from 
track J@ sector 2 to location 3490Htb. 


As an example, the Intel MDS-880 hardware cold start loader brings 
track 9, sector 1 into absolute address 360H. Upon loading this 
sector, control transfers to location 3990H, where the bootstrap 
operation commences by loading the remainder of tracks J, and all of 
track 1 into memory, starting at 340WH+b. The user should note that 
tnis bootstrap loader is of little use in a non-MDS environment, 
although it is useful to examine it since some of the boot actions 
will have to be duplicated in your cold start loader, 
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Track# Sector# Page# Memory Address CP/M Module name 


0) 61 (boot address) Cold Start Loader 
00 G2 ie) 34090H+b . CCP 
- 03 - 3480H+b . 
¥ 04 01 3500H+b - 

" 05 . 358W¥H+b ‘ 

" 06 G2 3600H+b ” 

- 07 . 3680H+b . 

= 08 93 3700H+b e 

: G9 . 378@H+b S 

” 10 G4 3800H+b i 

~ La ‘“ 3880H+b . 

7 12 05 3900H+b * 

. 13 " 3980H+b ’ 

- 14 66 3A00H+b : 

7 15 7 3A80H+b . 

. 16 07 3B00H+b i 
OG L7 = 3B88H+b CCP 
00 18 08 3C09H+b BDOS 

" 19 . 3C80H+b . 

- 26 99 3D00H+b : 

7 21 - 3D80H+b = 

. 22 10 3E90H+b ° 

es 23 . 3E8@H+b " 

a" 24 11 3FO00H+b . 

” 25 " 3F80H+b . 

" 26 12 4000H+b . 
01 81 ss 4080H+b * 

‘ 02 L3 4100H+b . 

s 03 " 4180H+b . 

: 04 14 4280H+b s 

“ 05 : 4286H+b * 

- 06 15 4300H+b ” 

: 87 . 4380H+b * 

" 08 16 44008H+b . 

. 69 “ 4480H+b . 

" 18 17 4580H+b . 

. 11 7 4580H+b 5 

. 12 18 4600H+b = 

7 L3 4680H+b is 

a 14 19 4700H+b " 

. is 2 4780H+b " 

™ 16 26 4860H+b * 

* 17 “ 4880H+b “ 

. 18 21 4960H+b 7 

01 19 ¥ 4980H+b BDOS 

01 208 22 4A00H+b BIOS 

. 21 " 4A890H+b » 

‘e 23 23 4B90H+b . 

: 24 a 4B80H+b . 

= 25 24 4CO08H+b 2 

01 26 a 4C8@H+b BIOS 

02-76 01-26 (directory and data) 
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THE BIOS ENTRY POINTS 


The entry points into the BIOS from the cold start loader and BDOS 
are detailed below. Entry to the BIOS is through a "jump vector" 
located at 4AW9H+b, as shown below (see Apvendices B and C, as well). 
The jump vector is a sequence of 17 jumo instructions which send 
program control to the individual BIOS subroutines, The BIOS 
subroutines may be empty for certain functions (i.e., they may contain 
a single RET operation) during regeneration of CP/M, but the entries 
must be present in the jump vector, 

The jump vector at 4A¥9H+b takes the form shown below, where the 


individual jump addresses are given 


4A00H+b JMP BOOT ; 
4A03H+p JMP WBOOT ; 
4A06H+b JMP CONST ? 
4A99H+b JMP CONIN ; 
4A9CH+D JMP CONOUT ; 
4AQ0FH+b JMp LIST ; 
4A12H+b JMP PUNCH ; 
4A15H+b JMP READER ; 
4Al18H+b JMP HOME ; 
4A1Bd+5 JMP SELDSK ; 
4Al1EH+9 JMP SETTRK ; 
4A21H+0 JMP SETSEC ; 
4A24H+b JMP SETDMA ; 
4A27H+b JMP READ ; 
4AZAH+0 JMP WRITE ; 
4A2DH+b JMP LISTST ; 
4A30H+b JMP SECTRAN ; 


Each jumo address corresponds 


to 


to the left: 


ARRIVE HERE FROM COLD START LOAD 
ARRIVE HERE FOR WARM START 

CHECK FOR CONSOLE CHAR READY 
READ CONSOLE CHARACTER IN 

WRITE CONSOLE CHARACTER OUT 
WRITE LISTING CHARACTER OUT 
WRITE CHARACTER TO PUNCH DEVICE 
READ READER DEVICE 

MOVE TO TRACK 00 ON SELECTED DISK 
SELECT DISK DRIVE 

SET TRACK NUMBER 

SET SECTOR NUMBER 

SET DMA ADDRESS 

READ SELECTED SECTOR 

WRITE SELECTED SECTOR 


’ RETURN LIST STATUS 


SECTOR TRANSLATE SUBROUTINE 


a particular subroutine which 


performs the specific function, as outlined below, There are three 
major divisions in the jump table: the system (re)initialization 
which results from calls on BOOT and WBOOT, simple character I/O 


pertormed by calls on CONST, CONIN, 
LISTST, 


CONOUT, LIST, PUNCH, READER, and 


and diskette I/O performed by calls on HOME, SELDSK, SETTRK, 


SETSEC, SETDMA, READ, 


WRITE, 


and SECTRAN, 


All simple character I/O operations are assumed to be performed in 
ASCII, upper and lower case, with high order (parity bit) set to zero, 


An end-of-file condition for an input device is given by an ASCII 
control-z (1AH). Peripheral devices are seen by CP/M as “logical” 
devices, and are assigned to physical devices within the BIOS, 

In order to operate, the BDOS needs only the CONST, CONIN, and 
CONOUT subroutines (LIST, PUNCH, and READER may be used by PIP, but 
not the BDOS). Further, the LISTST entry is used currently only by 
DESPOOL, and thus, the initial version of CBIOS may have empty 


subroutines for the remaining ASCII devices, 
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The characteristics of each device are 


CONSOLE The principal interactive console which communicates 

with the operator, accessed through CONST, CONIN, and 

G CONOUT. Typically, the CONSOLE is a device such as a 
CRT or Teletype. 


LIST The principal listing device, if it exists on your 
system, which is usually a hard-copy device, such as a 
printer or Teletype, 


PUNCH The principal tape punching device, if it exists, which 
is normally a high-speed paper tape punch or Teletype. 


READER The principal tape reading device, such as a_ simple 
optical reader or Teletype, 


Note that a single peripheral can be assigned as 
the LIST, PUNCH, and READER device simultaneously. If 
no peripheral device is assigned as the LIST, PUNCH, or 
READER device, the CBIOS created by the user may give 
an appropriate error message so that the system does 
not "hang" if the device is accessed by PIP or _ some 
other user ovrogram, Alternately, the PUNCH and LIST 
routines can just simply return, and the READER routine 
can return with a 1AH (ctl-Z) in reg A to indicate 
immediate end-of-file, 


For added flexibility, the user can ovtionally 
i implement the “IOBYTE" function which allows 
reassignment of ohysical and logical devices. The 
IOBYTE function creates a mapping of logical to 
physical devices which can be altered during CP/M 
processing (see the STAT commanc). The definition of 
the IOBYTE function corresponds to the Intel standard 
as follows: a single location in memory (currently 
location #@%83H) is maintained, called IOBYTE, which 
defines the logical to physical device mapping which is 
in effect at a particular time. The mapping is 
performed by splitting the IOBYTE into four distinct 
fields of two bits each, called the CONSOLE, READER, 
PUNCH, and LIST fields, as shown below: 


most significant least significant 


IOBYTE AT @003H | LIST | PUNCH | READER | CONSOLE | 


ee ee ee ee ee ee ee ee ee ee ee Ee ee -_-— 


bits 6,7 bits 4,5 bits 2,3 bits 6,1 


The value in each field can be in the range 6-3, 
defining the assigned source or destination of each 
logical device. The values which can be assigned to 

-each field are given below 


- oc) © ) 


a ‘oO 00 go OO = \Q00 00048 
3 FO 
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CONSOLE field (bits 6,1) 


8 - console is assigned to the console printer device (TTY:) 
l - console is assigned to the CRT device (CRT:) 
© 2 - batch mode: use the READER as the CONSOLE input, 
and the LIST device as the CONSOLE output (BAT:) a 
3 - user defined console device (UC1:) 


ER — (bits 253) 

4) READER is the Teletype device (TTY:) 

1 - READER is the high-speed reader device (RDR:) 
2 - user defined reader # 1 (URI1:) 

3 - user defined reader # 2 (UR2:) 


PUNCH field (bits 4,5) 
0 - PUNCH is the Teletype device (TTY:) 
1 - PUNCH is the high speed punch device (PUN:) 
C) 2 - user defined punch # 1 (UP1:) 
3 - user defined ounch # 2 (UP2:) 


LIST ELebe (bits 6,7) 

LIST is the Teletype device (TTY:) 
LIST is the CRT device (CRT:) 

LIST is the line printer device (LPT:) 
- user defined list device (ULI1:) 


WnNnr @ 
ae | 


Note again that the imolementation of the IOBYTE is 
optional, and affects only the organization of your 


CBIOS, No CP/M systems use the IOBYTE (although they 

KX Do 600 tolerate the existence of the I08YTE at location 
a O¥¥3H), except for PIP which allows access to the 
physical devices, and STAT wnicn allows 

O00 00 ¢ »-774 logical-pnysical assignments to be made and/or 
es) eu Oewn-eee Gisplayed (for more information, see the "CP/M Features 
and Facilities Guide"). In any case, the IOBYTE 


© 6: implementation should be omitted until your basic CBIOS 
se go oeeo US! Ais fully implemented and tested; then add the IOBYTE to 
increase your facilities. 


Disk I/O is always performed through a sequence of 
calls on the various disk access subroutines which set 
up the disk number to access, the track and sector ona 
particular disk, and the direct memory access’ (DMA) 
address involved in the I/O operation, After all these 
parameters have been set up, a call is made to the READ 
Or WRITE function to perform the actual I/O operation. 
Note that there is often a single call to SELDSK to 
select a disk drive, followed by a number of read or 
write operations to the selected disk before selecting 
another drive for subsequent operations, Similarly, 
there may be a single call to set the DMA address, 
followed by several calls which read or write from the 
selected DMA address peftore the DMA address is changed, 
The track and sector subroutines are, always called 
before the READ or WRITE operations are performed, 
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BOOT 


wBOoOT 


CONST 


CONIN 


Wote that the READ and WRITE routines’ should 
perform several retries (10 is standard) before 
reporting the error condition to the BDOS, If the 
error condition is returned to the BDOS, it will report 
the error to the user. The HOME subroutine may or may 
not actually perform the track 90 seek, depending upon 
your controller characteristics; the important point is 
that track 08 has been selected for the next operation, 
and is often treated in exactly the same manner as 
SETTRK with a parameter of JG. 


The exact responsibdilites of eacn entry point 
Subroutine are given below: 


The BOOT entry point gets control from the cold start 


loader and is’ responsible for basic system 
initialization, including sending a _ signon message 
(which can be omitted in the first version), If the 


IOBYTE function is implemented, it must be set at this 
point, ‘The various system parameters whicn are set by 
the WBOOT entry point must be initialized, and control 
is transferred to the CCP at 34@@H+b for further 
processing, Note that reg C must be set to zero to 
select drive A, 


The WBOOT entry point gets control when a warm start 
occurs. A warm start is performed whenever a user 
program branches to location #998H, or when the CPU is 
reset from the front panel. The CP/M system must be 
loaded from the first two tracks of drive A up to, but 
not including, the BIOS (or CBIOS, if you have 
completed your patch). System parameters must be ini- 
tialized as shown below: 


location 9,1,2 set to JMP WBOOT for warm starts 
(8000H: JMP 4A83H+b) 

location 3 set initial value of IOBYTE, if 
implemented in your CBIOS 

location 5,6,7 set to JMP BDOS, which is the 
primary entry point to CP/M for 
transient programs, (99@5H: JMP 
3CW6H+b) 


(see Section 9 for complete details of page zero use) 
Upon completion of the initialization, the WBOOT 
program must branch to the CCP at 349@H+b to (re)start 
the system. Upon entry to the CCP, register C is set 
to the drive to select after system initialization. 


Sample the status of the currently assigned console 
device and return @FFH in register A if a character is 
ready to read, and 9@H in register A if no console 
characters are ready. 


Read the next console character into register A, and 
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CONOUT 


LIST 


PUNCH 


READER 


HOME 


SELDSK 


set the parity pit (high order bit) to zero. If no 
console character is ready, wait until a character is 
typed before returning, : 


Send the character from register C to the console 
output device, The character is in ASCII, with high 
order parity bit set to zero, You may want to include 
a time-out on a line feed or carriage return, if your 
console device requires some time interval at the end 
of the line (such as a TI Silent 760 terminal). You 
can, if you wish, filter out control characters which 
cause your console device to react in a strange way (a 
control-z causes the Lear Seigler terminal to clear 
the screen, for examvle). 


Send the character from register C to the currently 
assigned listing device, The character is in ASCII 
with zero parity. 


Send the character from register C to the currently 
assigned punch device, The character is in ASCII with 
zero parity. 


Read the next character from the currently assigned 
reader device into register A with zero parity (high 
order bit must be zero), an end of file condition is 
reported by returning an ASCII control-z (1AH). 


Return the disk head of the currently selected disk 
(initially disk A) to the track @@ position. If your 
controller allows access to the track © flag from the 
drive, step the head until the track @ flag is 
detected, If your controller does not support this 
feature, you can translate the HOME call into a call 
on SETTRK with a parameter of @. 


Select the disk drive given by register C for further 
operations, where register C contains @ for drive A, l 
for drive 8B, and so-forth up to 15 for drive P (the 
standard CP/M distribution version supports four 
drives). On each disk select, SELDSK must return in 
HL the base address of a 16-byte area, called the Disk 
Parameter ~ Header, described in the Section 10. For 
standard floppy disk drives, the contents of the 
header and associated tables does not change, and thus 
the program segment included in the sample CBIOS 
performs this operation automatically. If there is an 
attempt to select a non-existent drive, SELDSK returns 
HL=0000H as an error indicator, Although SELDSK must 
return the header address on each call, it is 
advisable to postpone the actual physical disk select 
operation until an I/O function (seek, read or write) 
is actually performed, since disk selects often occur 
without utimately performing any disk I/0, and many 
controllers will unload the head of the current disk 
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SETTRK 


SETSEC 


SETDMA 


READ 


WRITE 


before selecting the new drive. This would cause an 
excessive amount of noise and disk wear, 


Register BC contains the track number for subsequent 
disk accesses on the currently selected drive. You 
can choose to seek the selected track at this time, or 
delay the seek until the next read or write actually 
occurs, Register BC can take on values in the range 
0-76 corresponding to valid track numbers for standard 
floppy disk drives, and 6-65535 for non-standard disk 
subsystems, 


Register BC contains the sector number (1 through 26) 
for subseguent disk accesses on the currently selected 
drive. You can choose to send this information to the 
controller at this point, or instead delay sector 
selection until a read or write operation occurs, 


Register BC contains the DMA (disk memory access) 
address for subsequent read or write operations, For 
example, if B = @#H and C = 89H when SETDMA is called, 
then all subsequent read operations read their data 
into 8@H through @FFH, and all subsequent write 
operations get their data from 80H through OFFH, until 
the next call to SETDMA occurs, The initial DMA 


address is assumed to be 80H. Note that the 
controller need not actually support direct memory 
access, If, for example, all data is received and 


sent through I/O ports, the CBIOS which you construct 
will use the 128 byte area starting at the selected 
DMA address for the memory buffer during the following 
read or write operations, 


Assuming the drive has been selected, the track has 
been set, the sector has been set, and the DMA aadress 
has been specified, the READ subroutine attempts to 
read one sector based upon these parameters, and 
returns the following error codes in register A: 


1) no errors occurred 
1 non-recoverable error condition occurred 


Currently, CP/M responds only to a zero or non-zero 
value as tne return code, That is, if the value in 
register A is @ then CP/M assumes that the disk 
operation completed properly. If an error occurs, 
however, the CBIOS should attempt at least 16 retries 
to see if the error is recoverable, When an error is 
reported the BDOS will print the message "BDOS ERR ON 
X¢ BAD SECTOR", The operator then has the option of 
typing <cr> to ignore the error, or ctl-C to abort, 


Write the data from the currently selected DMA address 
to the currently selected drive, track, and _ sector, 
The data should be marked as “non deleted data" to 
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Maintain compatibility with other CP/M systems, The 
error codes given in the READ command are returned in 
register A, with error recovery attempts as described 
above, 


LISTST Return the ready status of the list device. Used by 
tne DESPOOL program to improve console response during 
its operation, The value 68 is returned in A if the 
list device is not ready to accept a character, and 
OFFH if a character can be sent to the printer. Note 
that a 0@@ value always suffices, 


SECTRAN Performs sector logical to physical sector translation 
in order to improve the overall response of CP/M, 
Standard CP/M systems are shipped with a “skew factor" 
of 6, where six physical sectors are skipped between 
each logical read operation, This skew factor allows 
enough time between sectors for most programs to load 
their buffers witnout missing the next sector, In 
particular computer systems which use fast processors, 
memory, and disk subsystems, the skew factor may be 
changed to improve overall response, Note, however, 
that you should maintain a single density IBM 
compatible version of CP/M for information transfer 
into and out of your computer system, using a_e skew 
factor of 6. In general, SECTRAN receives a logical 
sector number in BC, and a translate table address in 
DE. The sector number is used as an index into the 
translate table, witn the resulting physical sector 
number in HL, For standard systems, the taoles and 
indexing code is vrovided in the CBIOS and need not be 
changed, 
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7. A SAMPLE BIOS 


The program shown in Appendix C can serve as a basis for your 
first BIOS. The simplest functions are assumed in this BIOS, so that 
you can enter it through the front panel, if absolutely necessary. 
Note that the user must alter and insert code into the subroutines for 
CONST, CONIN, CONOUT, READ, WRITE, and WAITIO subroutines. Storage is 
reserved for user-supplied code in these regions, The scratch area 
reserved in page zero (see Section 9) for the BIOS is used in this 
program, so that it could be implemented in ROM, if desired, 


Once operational, this skeletal version can be enhanced to. print 
the initial sign-on message and perform better error recovery. The 


Subroutines for LIST, PUNCH, and READER can be filled-out, and the 
IOBYTE function can be implemented, 
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38. A SAMPLE COLD START LOADER 

The program shown in Appendix D can serve as a basis for your cold 
Start loader. The disk read function must be supplied by the user, 
ana the program must be loaded somehow starting at location 6000. 
Note that space is reserved for your patch so that the total amount of 
storage required for the cold start loader is 128 bytes, Eventually, 
you will probably want to get this loader onto the first disk sector 
(track #0, sector 1), and cause your controller to load it into memory 
automatically upon system start-uo. Alternatively, you may wish to 
place tne cold start loader into ROM, and place it above the CP/M 
system, In this case, it will be necessary to originate the program 
at a higher address, and key-in a jump instruction at system start-up 
which brancnes to the loader. Subsequent warm starts will not require 
this key-in operation, since the entry point ‘WBOOT’ gets control, 
thus bringing the system in from disk automatically. Note also that 
the skeletal cold start loader has minimal error recovery, which may 
pe enhanced on later versions, 
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9. RESERVED LOCATIONS IN PAGE ZERO 


Main memory page zero, between locations @@H and JOFFH, contains 
several segments of code and data which are used during CP/i 
processing. The code and data areas are given below for reference 
purposes, 


Locations Contents 
from to 
G@000H - 0602H Contains a jump instruction to the warm start 


entry point at location 4AQ3H+b. This allows a 
simple programmed restart (JMP @®@0¥8H) or manual 
restart from the front vanel. 


000 3H 


000 3H Contains the Intel standard IOBYTE, which is 
optionally included in the user's CBIOS, as 
described in Section 6. 


000 4H 009 4H Current default drive number (#=A,...,15=P). 


08005H 


0007H Contains a jump instruction to the B8DOS,and 
serves two purposes: JMP 9895H provides the 
primary entry point to the BDOS, as described in 
the manual “CP/M Interface Guide," and LHLD 
Q@006H brings the address field of the 
instruction to the HL register pair. This value 
is the lowest address in memory used by CP/M 
(assuming the CCP is being overlayed). Note 
that the DDT program will change the address 
field to reflect the reduced memory size in 
debug mode, 


@9838H - 6027H (interrupt locations 1 through 5 not used) 


0830H - 99378 (interrupt location 6, not currently used - 
reserved) 


Q0938H - @93AH Restart 7 - Contains a jump instruction into the 
DDT or SID program when running in debug’ mode 
for programmed breakpoints, but is not otherwise 
used by CP/M, 

Q9293BH - GO3FH (not currently used - reserved) 

O040H - YO4FH 16 byte area reserved for scratch by CBIOS, but 
is not used for any purpose in the distribution 
version of CP/M 

O050H - YU5BH (not currently used - reserved) 

W0@5CH - 897CH default file control block produced for a 
transient program by the Console Command 
Processor, 


Q0@7DH - ®07FH Optional default random record position 
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@080H - OOFFH default 128 byte disk buffer (also filled with 
the command line wnen a transient is loaded 
under the CCP). 


Note that this information is set-up for normal operation under 
the CP/M system, but can be overwritten by a transient program if the 
BDOS facilities are not required by the transient, 


If, for example, a particular program performs only simple I/O and 
must begin execution at location @, it can be first loaded into the 
TPA, using normal CP/M facilities, with a small memory move program 
which gets control wnen loaded (the memory move program must get 
control from location §1H#0H, which is the assumed beginning of all 
transient programs). The move program can then proceed to move _ the 
entire memory image down to location @, and pass control to the 
starting address of the memory load, Wote that if the BIOS is 
overwritten, or if location § (containing the warm start entry voint) 
is overwritten, then the programmer must bring the CP/M system back 
into memory with a cold start sequence, 
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18. DISK PARAMETER TABLES, 


Tables are included in the BIOS which describe the particular 
characteristics of the disk subsystem used with CP/M. These tables 
can be either hand-coded, as shown in the sample CBIOS in Appendix C, 
or automatically generated using the DISKDEF macro library, as shown 
in Appendix B. The purpose here is to describe the elements of these 
tables, 


In general, each disk drive has an associated (l6-byte) disk 
Parameter header which both contains information about the disk drive 
and provides a scratchpad area for certain BDOS operations, The 
format of the disk parameter header for each drive is shown below 


348 4YE 3/6 ay , Disk Parameter | Header 

Fae Ti Sit eee hae Aa eR a Mi me 2 a 6 S| re ee ee ee ee eee 

| XLT | 9800 | 00006 | 6600 |DIRBUF| DPB | csv | ALV | 
16b 16b 16b 16b 16b 16b 16b 16b 


where each element is a word (16-bit) value. The meaning of each Disk 
Parameter Header (DPH) element is 


XLT Address of the logical to physical translation vector, 
if used for this particular drive, or the value 9000H 
if no sector translation takes place (i.e, the physical 
and logical sector numbers are the same). Disk drives 
with identical sector skew factors share the same 
translate tables, 


0600 Scratchpad values for use within the BDOS (initial 
value is unimportant). 

DIRBUF Address of a 128 byte scratchpad area for directory 
operations within BDOS. All DPH's address the same 


scratchpad area, 


DPB , Address of a disk parameter block for this drive, 
js Drives with identical disk characteristics address the 
0 same disk parameter block, 
CSV Address of a scratchpad area used for software check 
for changed disks, This address is different for each 
DPH. 
ALV Address of a scratchpad area used by the BDOS to keep 


disk storage allocation information, This address is 
different for each DPH, 


Given n disk drives, the DPH's are arranged in a table whose first row 


of 16 bytes corresponds to drive 6, with the last row corresponding to 
drive n-l, The table thus appears as 


(All Information Contained Herein is Proprietary to Digital Research, ) 


25 


DPBASE: 


98 |XLT 60) 0900 | GOOG | BHBD |DIRBUF|DBP BBICSV BOIALV 4G| 


G91 |XLT 01| 0000 | 06000 | 0800 |DIRBUF|DBP @1|CSV J1IALV 61| 


n-1|XLTn-1| 0009 | 08000 | 0800 |DIRBUF|DBPn-1]|CSVn-1|ALVn-1 | 


where the label DPBASE defines the base address of the DPH table. 


A responsibility of the SELDSK subroutine is to return the base 
address of the DPH for the selected drive. The following sequence of 
operations returns the table address, with a 9@9@H returned if the 
selected drive does not exist, 


NDISKS EQU 4 ;NUMBER OF DISK DRIVES 
SELDSK: 

;SELECT DISK GIVEN BY BC 

LXI H,@909H ;ERROR CODE 


MOV A,C ;DRIVE OK? 
CPI NDISKS ;CY IF SO 
RNC sRET IF ERROR 
;NO ERROR, CONTINUE 

MOV i iC ; LOW (DISK) 
MOV H,B ;HIGH(DISK) 
DAD H 2*2 

DAD H 3*4 

DAD H 7 *8 

DAD H :*16 

LXI D,DPBASE ;FIRST DPH 
DAD D ;DPH (DISK) 
RET 


The translation vectors (XLT @@ through XLTn-1) are _ located 
elsewhere in the BIOS, and simply correspond one-for-one with the 
logical sector numbers zero through the sector count-l,. The Disk 
Parameter Block (DPB) for each drive is more complex. A particular 
DPB, which is addressed by one or more DPH's, takes the general form 


16b 8b 8b 8b 16b 16b 8b 8b 16b 16b 


where each is a byte or word value, as shown by the “8b" or “16b" 
indicator below the field. 


SPT is the total number of sectors per track 
BSH is the data allocation block shift factor, determined 
by the data block allocation size, 
(All Information Contained Herein is Proprietary to Digital Research.) 


26 


EXM is the extent mask, determined by the data block 
allocation size and the number of disk blocks. 


DSM determines the total storage capacity of the disk drive 


DRM determines the total number of directory entries which 
can be stored on this drive AL@,AL1 determine reserved 
directory blocks, 


CKS is the size of the directory check vector 


OFF is the number of reserved tracks at the beginning of 
the (logical) disk. 


The values of BSH and BLM determine (implicitly) the data allocation 
size BLS, which is not an entry in the disk parameter block. Given 
that the designer has selected a value for BLS, the values of BSH and 
BLM are shown in the table below 


BLS BSH BLM 
1,024 3 a 
2,048 4 15 
4,696 5 31 
8,192 6 63 

16,384 7 i2? 


where all values are in decimal. The value of EXM depends upon both 
the BLS and whether the DSM value is less than 256 or greater than 
255, as shown in the following table 


BLS DSM < 256 DSM > 255 
1,024 M7) N/A 
2,048 i Y) 
4,096 3 A, 
8,192 7 3 

16,384 15 7 


The value of DSM is the maximum data block number supported by 
this particular drive, measured in BLS units, The product BLS times 
(DSM+1) is the total number of bytes held by the drive and, of course, 
Must be within the capacity of the physical disk, not counting the 
reserved operating system tracks, 


The DRM entry is the one less than the total number of directory 
entries, which can take on a 16-bit value, The values of AL@ and ALl, 
however, are determined by DRM, The two values AL@® and AL1 can 
together be considered a string of 16-bits, as shown below. 
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92 01 O92 63 O04 65 B86 67 O08 69 18 111213 14 15 


where position @@ corresponds to the high order bit of the byte 
labelled AL®@, and 15 corresponds to the low order bit of the byte 
labelled AL1. Each bit position reserves a data block for number of 
directory entries, thus allowing a total of 16 data blocks to be 
assigned for directory entries (bits are assigned starting at 6@ and 
filled to the right until position 15). Each directory entry occupies 
32 bytes, resulting in the following table 


BLS Directory Entries 
1,024 32 times # bits 
2,048 64 times # bits 
4,096 128 times # bits 
8,192 256 times # bits 

16,384 512 times # bits 


Thus, if DRM = 127 (128 directory entries), and BLS = 1824, then there 
are 32 directory entries per block, requiring 4 reserved blocks, In 
this case, the 4 high order bits of AL®@ are set, resulting in the 
values AL@ = OFOH and ALI] = OOH. 


The CKS value is determined as follows: if the disk drive media 
is removable, then CKS = (DRM+1)/4, where DRM is the last directory 
entry number, If the media is fixed, then set CKS = @ (no directory 
records are checked in this case). 


Finally, the OFF field determines the number of tracks which are 
skipped at the beginning of the physical disk. This value is 
automatically added whenever SETTRK is called, and can be used as a 
mechanism for skipping reserved operating system tracks, or _ for 
partitioning a large disk into smaller segmented sections, 


To complete the discussion of the DPB, recall that several DPH's 
can address the same DPB if their drive characteristics are identical. 
Further, the DPB can be dynamically changed when a new drive is 
addressed by simply changing the pointer in the DPH since the _ BDOS 
copies the DPB values to a local area whenever the SELDSK function is 
invoked. 


Returning back to the DPH for a particular drive, note that the 
two address values CSV and ALV remain. Both addresses reference an 
area of uninitialized memory following the BIOS, The areas must be 
unique for each drive, and the size of each area is determined by the 
values in the DPB, 


The size of the area addressed by CSV is CKS bytes, which is 
sufficient to hold the directory check information for this particular 
drive. If CKS = (DRM+1)/4, then you must reserve (DRM+1)/4 bytes for 
directory check use. If CKS = @, then no storage is reserved, 
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The size of the area addressed by ALV is determined by the 
maximum number of data blocks allowed for this particular disk, and is 
computed as (DSM/8)+1l. 


The CBIOS shown in Appendix C demonstrates an instance of these 
tables for standard 8" single density drives. It may be useful to 


examine this program, and compare the tabular values with the 
definitions given above, 
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ll. THE DISKDEF MACRO LIBRARY, 


A macro library is shown in Appendix F, called DISKDEF, which 
greatly simplifies the table construction process. You must have 
access to the MAC macro assembler, of course, to use the DISKDEF 
facility, while the macro library is included with all CP/M 2.8 
distribution disks. 


A BIOS disk definition consists of the following sequence of 
macro statements: 


MACLIB DISKDEF 
DISKS n 
DISKDEF @,... 
DISKDEF 1l,... 
DISKDEF n-l 


ENDEF 


where the MACLIB statement loads the DISKDEF.LIB file (on the same 
disk as your BIOS) into MAC's internal tables, The DISKS macro call 
follows, which specifies the number of drives to be configured with 
your system, where n is an integer in the range 1 to 16. A series of 
DISKDEF macro calls then follow which define the characteristics of 
each logical disk, @ through n-1l (corresponding to logical drives A 
through P). Note that the DISKS and DISKDEF macros generate the 
in-line fixed data tables described in the previous section, and thus 
must be placed in a non-executable portion of your BIOS, typically 
directly following the BIOS jump vector. 


The remaining portion of your BIOS is defined following the 
DISKDEF macros, with the ENDEF macro call immediately preceding the 
END statement, The ENDEF (End of Diskdef) macro generates’ the 
necessary uninitialized RAM areas which are located in memory above 
your BIOS, 


The form of the DISKDEF macro call is 


DISKDEF dn,fsc,lsc,[skf],bls,dks,dir,cks,ofs, [9] 


where 
dn is the logical disk number, @ to n-l 
fsc is the first physical sector number (@ or 1) 
lsc is the last sector number 
skf is the optional sector skew factor 
bls is the data allocation block size 
dir is the number of directory entries 
cks is the number of “checked" directory entries 
ofs is the track offset to logical track @9 
[8] is an optional 1.4 compatibility flag 


The value “dn“ is the drive number being defined with this DISKDEF 
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Macro invocation, The “fsc" parameter accounts for differing sector 
numbering systems, and is usually @ or l, The "lsc" is the last 
numbered sector on a track. When present, the “skf" parameter defines 
the sector skew factor. which is used to create a sector translation 
table according to the skew. If the number of sectors is less than 
256, a single-byte table is created, otherwise each translation table 
element occupies two bytes. No translation table is created if the 
skf parameter is omitted (or equal to @Q). The “bls"“ parameter 
specifies the number of bytes allocated to each data block, and takes 
on the values 1024, 2048, 4096, 8192, or 16384. Generally, 
performance increases with larger data block sizes since there are 
fewer directory references and logically connected data records are 
physically close on the disk. Further, each directory entry addresses 
more data and the BIOS-resident ram space is reduced, The "dks" 
specifies the total disk size in "bls" units, That is, if the bls = 
2048 and dks = 1000, then the total disk capacity is 2,048,008 bytes. 
If dks is greater than 255, then the block size parameter bls must be 
greater than 1624, The value of "“dir“ is the total number of 
directory entries which may exceed 255, if desired, The "“cks" 
parameter determines the number of directory items to check on each 
directory scan, and is used internally to detect changed disks during 
system operation, where an intervening cold or warm start has not 
occurred (when this situation is detected, CP/M automatically marks 
the disk read/only so that data is not subsequently destroyed). As 
stated in the previous section, the value of cks = dir when the media 
is easily changed, as is the case with a floppy disk subsystem, If 
the disk is permanently mounted, then the value of cks is typically @, 
since the probability of changing disks without a restart is quite 
low. The “ofs" value determines the number of tracks to skip when 
this particular drive is addressed, which can be used to reserve 
additional operating system space or to simulate several logical 
drives on a single large capacity physical drive. Finally, the _ [86] 
parameter is included when file compatibility is reguired with 
versions of 1.4 which have been modified for higher density disks. 
This parameter ensures that only 16K is allocated for each directory 
record, as was the case for previous’ versions, Normally, this 
parameter is not included, 


For convenience and economy of table space, the special form 
DISKDEF i, 
gives disk i the same characteristics as a previously defined drive j. 


A standard four-drive single density system, which is compatible with 
version 1.4, is defined using the following macro invocations: 
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DISKS 4 


DISKDEF 9,1,26,6,1024,243,64,64,2 
DISKDEF 1,8 : 
DISKDEF 2,0 

DISKDEF 3,6 % 
ENDEF 


with all disks having the same parameter values of 26 sectors per 
track (numbered 1 through 26), with 6 sectors skipped between each 
access, 1024 bytes per data block, 243 data blocks for a total of 243k 
byte disk capacity, 64 checked directory entries, and two operating 
system tracks, 


The DISKS macro generates n Disk Parameter Headers (DPH's), 
starting at the DPH table address DPBASE generated by the macro. Each 
disk header block contains sixteen bytes, as described above, and 
correspond one-for-one to each of the defined drives. In the four 
drive standard system, for example, the DISKS macro generates a table 
of the form: 


DPBASE EQU $ 

DPE®: DW XLT6 ,6600H,9900H,00900H,DIRBUF,DPB9,CSV®%,ALVO 
DPE1: DW XLT@ ,8000H,9000H,0000H,DIRBUF,DPB9,CSV1,ALV1 
DPE2: DW XLTO ,0000H,0000H,0000H,DIRBUF,DPBO,CSV2,ALV2 
DPE3: DW XLTO ,0860H,0900H,0000H,DIRBUF,DPBS,CSV3,ALV3 


where the DPH labels are included for reference purposes to show the 
beginning table addresses for each drive @ through 3, The values 
contained within the disk parameter header are described in detail in 
the previous section, The check and allocation vector addresses are 


generated by the ENDEF macro in the ram area following the BIOS’ code 
and tables, 


Note that if the “skf" (skew factor) parameter is omitted (or 
equal to 06), the translation table is omitted, and a 9@@0H value is 
inserted in the XLT position of the disk parameter header for the 
disk, In a subsequent call to perform the logical to physical 
translation, SECTRAN receives a translation table address of DE = 
0000H, and simply returns the original logical sector from BC in the 
HL register pair. A translate table is constructed when the skf 
parameter is present, and the (non-zero) table address is placed into 
the corresponding DPH's,. The table shown below, for example, is 
constructed when the standard skew factor skf = 6 is specified in the 
DISKDEF macro call: 


XLT@: DB L759 b3919 25 5h 1sb 7p 235959 015021 
DB 2,8,14,28,26,6,12,18,24,4,18,16,22 


Following the ENDEF macro call, a number of uninitialized data 
areas are defined. These data areas need not be a part of the BIOS 
which is loaded upon cold start, but must be available between the 
BIOS and the end of memory. The size of the uninitialized RAM area is 
determined by EQU statements generated by the ENDEF macro, Fora 
standard four-drive system, the ENDEF macro might produce 
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4C72 = BEGDAT EQU $ 
(d@ta areas) 
4DB9 = DAT EQU $ 
G13C = DATSIZ EQU $-BEGDAT 


which indicates that uninitialized RAM begins at location 4C72H, ends 
at 4DBOH-1, and occupies @613CH bytes, You must ensure that these 
addresses are free for use after the system is loaded, 


After modification, you can use the STAT program to check your 
drive characteristics, since STAT uses the disk parameter block to 
decode the drive information. The STAT command form 


STAT d:DSK: 


decodes the disk parameter block for drive d (d=A,...,P) and displays 
the values shown below: 


128 Byte Record Capacity 
Kilobyte Drive Capacity 
32 Byte Directory Entries 
Checked Directory Entries 
Records/ Extent 

Records/ Block 

Sectors/ Track 

Reserved Tracks 


rTHOeDAAAH 


Three examples of DISKDEF macro invocations are shown below with 
corresponding STAT parameter values (the last produces a full 
8-megabyte system). 


DISKDEF @,1,58,,2048,256,128,128,2 
r=4996, k=512, d=128, c=128, e=256, b=16, s=58, t=2 


DISKDEF @,1,58,,2048,1024,300,0,2 
r=16384, k=2048, d=300, c=0, e=128, b=16, s=58, t=2 


DISKDEF 9,1,58,,16384,512,128,128,2 
r=65536, k=8192, d=128, c=128, e=1924, b=128, s=58, t=2 
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12. SECTOR BLOCKING AND DEBLOCKING, 


Upon each call to the BIOS WRITE entry point, the CP/M BDOS 
includes information which allows effectiv sector blocking and 
deblocking where the host disk subsystem has a Sector size which is a 
multiple of the basic 128-byte unit, The purpose here is to present a 
general-purpose algorithm which can be included within your BIOS which 
uses the BDOS information to perform the operations automatically, 


Upon each call to WRITE, the BDOS provides the following 
information in register C: 


1) = normal sector write 
: = write to directory sector 
2 = write to the first sector 


of a new data block 


Condition @ occurs whenever the next write operation is into a 
previously written area, such as a random mode record update, when the 
write is to other than the first sector of an unallocated block, or 
when the write is not into the directory area, Condition 1 occurs 
when a write into the directory area is performed, Condition 2 occurs 
when the first record (only) of a newly allocated data block is 
written, In most cases, application programs read or write multiple 
128 byte sectors in sequence, and thus there is little overhead 
involved in either operation when blocking and deblocking records 
since pre-read operations can be avoided when writing records, 


Appendix G lists the blocking and deblocking algorithms in skeletal 
form (this file is included on your CP/M disk). Generally, the 
algorithms map all CP/M sector read operations onto the host disk 
through an intermediate buffer which is the size of the host disk 
sector. Throughout the program, values and variables which relate to 
the CP/M sector involved in a seek operation are prefixed by “sek,” 
while those related to the host disk system are prefixed by “hst," 
The equate statements beginning on line 29 of Appendix G define the 
mapping between CP/M and the host system, and must be changed if other 
than the sample host system is involved, 


The entry points BOOT and WBOOT must contain the initialization 
code starting on line 57, while the SELDSK entry point must be 
augmented by the code starting on line 65, Note that although the 
SELDSK entry point computes and returns the Disk Parameter Header 
address, it does not physically selected the host disk*at this point 
(it is selected later at READHST or WRITEHST). Further, SETTRK, 
SETTRK, and SETDMA simply store the values, but do not take any other 
action at this point, SECTRAN performs a trivial trivial function of 
returning the physical sector number, 


The principal entry points are READ and WRITE, starting on lines 
11@ and 125, respectively. These subroutines take the place of your 
previous READ and WRITE operations, 

The actual physical read or write takes place at either WRITEHST 
or READHST, where all values have been prepared: hstdsk is the host 
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disk number, hsttrk is the host track number, and hstsec is the host 
sector number (which may require translation to a physical sector 


number) , You must insert code at this point which performs the full 
host sector read or write into, or out of, the buffer at hstbuf of 
length hstsiz,. All other mapping functions are performed by the 
algorithms, 


This particular algorithm was tested using an 8@ megabyte hard 
Gdisk unit which was originally configured for 128 byte sectors, 
producing approximately 35 megabytes of formatted storage, When 
configured for 512 byte host sectors, usable storage increased to 57 
megabytes, with a corresponding 480% improvement in overall response, 
In this situation, there is no apparent overhead involved in 
deblocking sectors, with the advantage that user programs still 
maintain the (less memory consuming) 128-byte sectors, This is 
primarily due, of course, to the information provided by the BDOS 
which eliminates the necessity for pre-read operations to take place, 
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APPENDIX A: THE MDS COLD START LOADER 


MDS-888 Cold Start Loader for CP/M 2.90 


Version 2.8 August, 1979 


e =e se Se 


G000 = false equ M) 
ffLE = true equ not false 
0888 = testing equ false 
if testing 
bias equ 83400h 
endif 
My a not testing 
Q000 = bias equ 88O8Gh 
endif 
OG00 = cpmb equ bias ;base of dos load 
0806 = bdos equ 886h+bias ;entry to dos for calls 
1880 = bdose equ 188@h+bias ;end of dos load 
1668 = boot equ 1600h+bias ;cold start entry point 
1603 = rboot equ boot+3 ;warm Start entry point 
3080 org 360Gh ;loaded here by hardware 
1886 = bdosl equ bdose-cpmb 
0002 = ntrks egu 2 ;tracks to read 
0031 = bdoss equ bdos1/128 :# sectors in bdos 
0619 = bdos@é equ 25 7# on track @ 
0018 = bdosl eau bdoss-bdos@ 7# on track 1 
£800 = mon8g@ equ ®@£800h ;intel monitor base 
ffOE = rmonsg9 equ O®£fOLhH -;restart location for mon8@ 
0078 = base equ 078h ;'base’ used by controller 
9679 = rtype equ basetl ;result type 
O007b = rbyte equ base+3 ;result byte 
O87£ = reset equ base+7 ;reset controller 
0878 = dstat equ base ;disk status port 
8079 = ilow equ baset+tl ;low iopb address 
O87a = ihigh equ base+2 ;high iopb address 
O0ff = bsw equ 8ffh ;boot switch 
0003 = recal equ 3h ;recalibrate selected drive 
9004 = readf egu 4h ;disk read function 
8100 = stack equ 16h suse end of boot for stack 
rstart: 
3000 310001 oe sp,stack;in case of call to mon8@ 
H clear disk status 
3693 db79 in rtype 
3005 db7b in rbyte 
; check if boot switch is off 
coldstart: 
3007 dbff in bsw 
3662 288730 3nz BoRastart Switch on? 


36 


30Ge 


36190 
3612 


3015 
3016 
3018 
3019 
301b 


301f 


3622 


3024 
3026 


3028 


302b 


302d 
3@2e 
3031 
3032 


3034 


3037 
303a 
383b 
303c 


303£ 


d37f 


0682 
214230 


7d 
d379 
71¢ 
d37a 
ab78 


e8fésa 


db79 
e683 
fev2 


d288308 


C200308 


118766 
19 
05 
c21538 


c38616 


=e se 


? 
start: 


, 


° 
‘ 


wait®@: 


=e =e 


=e 


=e 


=e 


=e se 


clear the controller 


out reset slogic cleared 
mvi b,ntrks ;number of tracks to read 
lxi h,iopb@é 


read first/next track into cpmb 


mov Aig 
out ilow 
mov a,h 
out ihigh 
in dstat 
$2. waits 


check disk status 


in rtype 

ani 1lb 

cpi 2 

if testing 

cnc rmon8g@ ;g0 to monitor if 11 or 19 
endif 

LE not testing 

jnec rstart ;retry the load 

endif 

in rbyte ;i/o complete, check status 
if not ready, then go to mon8@ 

ral 

cc rmon8@ ;not ready bit set 

rar ;restore 

ani 1111@b ;overrun/addr err/seek/cre 
he testing 

cnz rmon8@ ;go to monitor 

endif 

LE not testing 

jnz rstart ;retry the load 

endif 

lxi d,iopbl ;length of iopb 

dad d ;addressing next iopb 

dcr b s;count down tracks 

jnz start 


jmp boot, print message, set-up jmps 
jmp boot 


parameter blocks 


a7 


iopb®@: 


iopbl 


iopbl: 


88h 
readf 
bdos@ 
g 

2 
cpmb 


$-iopb@ 


80h 
readf 
bdosl 
1 

1 


;iocw, no update 

s;read function 

7# sectors to read trk @ 
strack @ 

;start with sector 2, trk @ 
;start at base of bdos 


ssectors to read on track 1 
strack 1 
s;sector 1 


cpmb+bdos@*128 ;base of second rd 
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0014 


4a0O 
3400 
3c06 
1680 
OG2c 
6802 
OO04 
2088 
O0Ba 


4a¥@ 
4a@3 
4aG6 
4aG9 
4a0c 


c3b34a 
c3c34a 
c3614b 
c3644b 
c36a4b 


APPENDIX B: THE MDS BASIC I/O SYSTEM (BIOS) 


se se se se se se SG te se Se se Ne 
o 
nn 
n 


Q 
ze) 
3 
on 


bdos 
cpoml 
nsects 
offset 
cdisk 
buff 
retry 


=e se Se Se Se Se Se Se Se Se Se Se Se Ne Se Se Te Se Te Se Se Se Se SO Se Se Ne 


wboote: 


mds-88@6 i/o drivers for cp/m 2.9 
(four drive single density version) 


version 2.@ august, 1979 

equ 26 sversion 2.0 
copyright (c) 1979 

digital research 


box 579, pacific grove 
california, 93950 


org 4a0@h ;base of bios in 20k system 

equ 3490h ;base of cpm ccp 

equ 3c06h ;base of bdos in 20k system 

equ $-cpmb ;length (in bytes) of cpm system 
equ cpm1/128;number of sectors to load 

equ 2 snumber of disk tracks used by cp 
equ 8804h saddress of last logged disk 

equ 008@h sdefault buffer address 

equ 10 s;max retries on disk i/o before e 


perform following functions 
boot cold start 
wboot warm start (save i/o byte) 
(boot and wboot are the same for mds) 
const console status 
reg-a = @@ if no character ready 
reg-a = ff if character ready 
conin console character in (result in reg-a) 
conout console character out (char in reg-c) 
list list out (char in reg-c) 
punch punch out (char in reg-c) 
reader paper tape reader in (result to reg-a) 
home move to track 40 


(the following calls set-up the io parameter bloc 
mds, which is used to perform subseguent reads an 
seldsk select disk given by reg-c (@,1,2...) 
settrk set track address (@,...76) for sub r/w 
setsec set sector address (1,...,26) 

setdma set subsequent dma address (initially 86h 


read/write assume previous calls to set i/o parms 
read read track/sector to preset dma address 
write write track/sector from preset dma addres 


jump vector for indiviual routines 


jmp boot 

jmp wboot 
jmp const 
jmp conin 
jmp conout 
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4a@£ c36d4b 
4a1l2 ¢c3724b 
4a15 ¢c3754b 
4a18 c3784b 
4alb c37d4b 
4ale c3a74b 
4a21 c3ac4b 
4a24 c3bb4b 
4a27 c3cl4b 
4a2a c3ca4b 
4a2d c37@4b 
4a30@ c3b14b 


4a33+= 

4a33+824aG0 
4a37+@800000 
4a3b+6e4c73 
4a3f+@d4dee 
4a43+824a0a 
4a47+000000 
4a4b+6e4c73 
4a4f+3c4dld 
4a53+824adG 
4a57+0G0000 
4a5b+6e4c73 
4a5f+6b4d4c 
4a63+824a0G 
4a67+0G0000 
4a6b+6e4c73 
4a6£+9a4d7b 


4a73+= 
4a73+1la@@ 
4a75+03 
4a76+07 
4a77+00 
4a78+£200 
4a7at+3 £00 
4a7ctcd 
4a7d+09 
4a7et+1000 
4a80+0 206 
4a82+= 
4a82+G1 
4a83+07 
4a84+0d 
4a85+13 
4a86+19 
4a87+085 
4a88+Gb 
4a89+11 
4a8at17 
4a8b+93 


=e 


dpbase 
dpeé: 


dpel: 


dpe2: 


dpe3: 


dpbd@ 


x1td 


dw 


list 
punch 
reader 
home 
seldsk 
settrk 
setsec 
setdma 
read 
write 
listst 
sectran 


slist status 


diskdef ;load the disk definition library 


4 ;four disks 

$ ;base of disk parameter blocks 
x1t@,800Gh ;translate table 
GO0GGh,GGWGh sscratch area 
dirbuf,dpb@ ;dir buff,parm block 
csv@,alv@ ;check, alloc vectors 
xlt1,@900h stranslate table 
0000h,800Gh ;scratch area 
dirbuf,dpbl ;dir buff,parm block 
csvl,alvl ;check, alloc vectors 
x1t2,0008h ;translate table 
G900h,898Gh ;scratch area 
dirbuf,dpb2 ;dir buff,parm block 
csv2,alv2 :check, alloc vectors 
x1t3,900Gh s;translate table 
089Gh,09O9BOh ;scratch area 
dirbuf,dpb3 ;dir buff,parm block 


csv3,alv3 


;check, alloc vectors 


0,1,26,6,1024,243,64,64,offset 
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;disk parm block 
;sec per track 
sblock shift 
z;block mask 
;extnt mask 
:;disk size-l 
;directory max 
;allocd 

sallocl 

check size 
;offset 
;translate table 


4a8c+09 
4a8d+OF 
4a8et+15 
4a8£+02 
4a98+08 
4a91+@e 
4a92+14 
4a93+la 
4a944+96 
4a95+0c 
4a96+12 
4a97+18 
4a98+04 
4a99+Ba 
4a9at+1O 
4a9b+16 


4a73+= 
OG1f+= 
OG1G+= 
4a82+= 


4a73+= 
Q@@1f+= 
061@+= 
4a82+= 


4a73+= 
QOG1£+= 
GG19+= 
4a82+= 


O@8fd 
OGfc 
OO£3 
O07e 


£800 
£fLOf 
£803 
£806 
£809 
£88c 
£80f 
£812 


dpbl 
alsl 
cssl 
xltl 


dpb2 
als2 
css2 
X1LEZ 


dpb3 
als3 
css3 
XLES 


=e se Se se se Se Se Se Se Me 


revrt 
inte 
icon 
inte 


, 


, 
mon8s@ 
rmon8gg@ 
ci 

ri 

co 

po 

lo 
csts 


diskdef 
equ 
egu 
egu 


equ 
diskdef 
equ 
egu 
equ 
egu 
diskdef 
egu 
equ 
equ 
equ 


endef occurs at 


;eguivalent parameters 

:;same allocation vector size 
same checksum vector size 
s;same translate table 


;equivalent parameters 

:;same allocation vector size 
ssame checksum vector size 
;same translate table 


;equivalent parameters 

s;same allocation vector size 
ssame checksum vector size 
;same translate table 

end of assembly 


end of controller - independent code, the remaini 
are tailored to the particular operating environm 
be altered for any system which differs from the 


the following code assumes the mds monitor exists 
and uses the i/o subroutines within the monitor 


we also assume the mds system has four disk drive 


equ 
equ 
equ 
equ 


mds 
equ 
equ 
equ 
equ 
equ 
equ 
equ 
equ 


®£dh 
®fch 
®£3h 


;interrupt revert port 
;interrupt mask port 
;interrupt control port 


G@111$111@b;enable rst @(warm boot) ,rst 7 


O£800h 
OffOfh 
O8£803h 
®£806h 
O£809h 
B£80ch 
®£80Fh 
O@£812h 
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monitor equates 


smds monitor 

;restart mon8@ (boot error) 
;console character to reg-a 
;reader in to reg-a 

sconsole char from c to console o 
;punch char from c to punch devic 
slist from c to list device 
;console status @0/ff to register 


9078 
0078 
0679 
087b 


0079 
O07a 


0004 
0006 
8003 
0004 
000d 
O00a 


4a9c 
4a9f 
4aal 
4aad 
4abG@ 


4ab3 
4ab6 
4ab9 
4abc 
4abd 
4ac® 


4ac3 


4ac6 
4ac8 


4ac9 
4acc 
4acf 
4adl 
4ad4 
4ad6 
4ad9 
4adb 


4ade 
4adft 


OdBava 
3230 
6b2043£ 
322e36 
QdVaGD 


signon: 


; 
boot: 


310001 


219c4a 
cdd34b 
af 

328400 
c38f4b 


318000 


Beba 
e5 


010634 
cdbb4b 
GevD 
cd7d4b 
BeOB 
cda74b 
GeG2 
cdac4b 


cl 
®@62c 


=e se 


disk ports and commands 


equ 78h ;base of disk command io ports 
equ base ;disk status (input) 

equ base+l ;result type (input) 

equ base+3 ;result byte (input) 

equ base+l ;iopb low address (output) 
equ base+2 ;iopb high address (output) 
equ 4h ;read function 

equ 6h ;write function 

equ 3h ;recalibrate drive 

equ 4h 7;i/o finished mask 

equ 8dh ;Carriage return 

equ Qah ;line feed 

;signon message: xxk cp/m vers y.y 

db er,1£,1f 

db *20' ;sample memory size 

db ‘k cp/m vers ' 

db vers/10+'@','.',vers mod 10+'@' 

db cr, Lt,8 


;print signon message and go to ccp 
(note: mds boot initialized iobyte at @@@3h) 


1x2 sp,buff+8@h 

Lz h,signon 

call prmsg ;print message 

xra a ;clear accumulator 

sta cdisk ;set initially to disk a 
jmp gocpm ;go to cp/m 


loader on track @, sector 1, which will be skippe 
read cp/m from disk - assuming there is a 128 byt 
start, 


lxi sp,buff ;using dma - thus 89 thru ff ok f 
mvi c,retry ;max retries 

push b 

;enter here on error retries 

1lxi b,cpmb ;set dma address to start of disk 
call setdma 

mvi c,@ ;boot from drive @ 

call seldsk 

mvi c,@ 

call settrk ;start with track @ 

mvi c,2 ;start reading sector 2 

call setsec 


read sectors, count nsects to zero 
pop b ;1@-error count 
mvi b,nsects 


42 


rdsec: ;read next sector 


4ael c5 push b ;save sector count 
4ae2 cdcl4b call read 
4ae5 c2494b jnz booterr ;retry if errors occur 
4ae8 2a6c4c lhlid iod s;increment dma address 
4aeb 118000 ixi d,128 s;sector size 
4aee 19 dad d ;incremented dma address in hl 
4aef 44 mov 6h 
4af® 4d mov rele | ;ready for call to set dma 
4afl cdbb4b call setdma 
4af4 3a6b4c lda ios ;sector number just read 
4af7 fela cpi 26 ;read last sector? 
4af9 da@54b jc rdl 
; must be sector 26, zero and go to next track 
4afc 3a6a4c lda iot ;get track to register a 
4aff 3c inr a 
4b00 4f mov c,a ;ready for call 
4b91 cda74b call settrk 
4b04 af xra a clear sector number 
4b85 3c rdl: inr a sto next sector 
4b06 4f mov c,a ;ready for call 
4b07 cdac4b call setsec 
4b#a cl pop b ;recall sector count 
4bdb 05 dcr b >done? 
4bGc c2el4a jnz rdsec 
; done with the load, reset default buffer address 
gocpm s (enter here from cold start boot) 
: enable rst@ and rst7 
4b6£ £3 di 
4b10 3e12 mvi a,12h s;initialize command 
4b12 d3fd out revrt 
4b14 af xra a 
4b1l5 d3£c out intc :;cleared 
4b17 3e7e mvi a,inte ;rst® and rst7 bits on 
4b19 d3fc out inte 
4blb af xra a 
Able d3£3 out icon ;interrupt control 
: set default buffer address to 86h 
4ble 018008 Lxi b,buff 
4b21 cdbb4b call setdma 
: reset monitor entry points 
4b24 3ec3 mvi a,jmp 
4b26 320008 sta 1) 
4b29 21034a lxi h,wboote 
4b2c 220160 shld i. ;jJmp wboot at location 00 
4b2f 320506 sta 5 
4b32 21863c lxi h,bdos 
4b35 220600 shld 6 ;jmp bdos at location 5 
4b38 323809 sta 7*8 ;jmo to mon8@ (may have been chan 
4b3b 2100£8 lxi h,mon8@ 
4b3e 223900 shld 7*84+1 


leave iobyte set 


=e 
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4b41 
4b44 
4b45 
4b46 


4b49 
4b4a 
4b4b 


4b4e 
4b4f 


4b52 
4b55 
4b58 


4b5b 


4b61 


4b64 


4b67 


4b69 


4b6a 


4b6d 


4b70 
4b71 


4b72 


4b75 


3a 408 
4f 
fb 
c38034 


el 
dd 
ca524b 


c5 
c3c94a 


215b4b 
cdd34b 
c30ffE 


3£626f4 


c312f8 


cd@3f8 


e67f 


c9 


c309f8 


c30ff8 


af 
c9 


c30c£8 


c306£8 


=e 


oO -- 


ooterr: 


=e 


booter®@: 


. 
’ 


bootmsg: 


listst: 


punch: 


e. 
, 


; 
reader: 


‘ 


7 
home: 


previously selected disk was b, send parameter to 


lda cdisk ;last logged disk number 

Mov c,a ;send to ccp to log it in a) 
ei 

jmp cpmb 

error condition occurred, print message and retry 
pop b ;recall counts 

dcr c 

jz booter®@ 

try again 

push b 

jmp wbhootgd 


otherwise too many retries 


lxi h,bootmsg 

call prmsg 

jmp rmon8@ ;mds hardware monitor 
db '?boot',@ 


;console status to reg-a 
(exactly the same as mds call) 
jmp csts 


;console character to reg-a 


call ct 
ani 7fh ;remove parity bit 
ret 


;console character from c to console out 
jmp co 


slist device out 
(exactly the same as mds call) 
jmp lo 


;return list status 
xra a 
ret ;always not ready 
;punch device out 
(exactly the same 
jmp po 


as mds call) 


in to reg-a 
as mds call) 


;reader character 
(exactly the same 
jmp ri 


;move to home position 
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4b78 
4b7a 


4b7da 
4b80 
4b81 
4b83 


4b84 
4b86 
4b89 
4b8a 
4b8c 
4b8d 
4b9@ 


4b92 
4b93 
4b96 
4b97 
4b99 
4b9a 


4838 


4b9e 
4b9f 
4bad 
4bal 
4ba2 
4ba5 
4ba6 


4ba7 
4baa 
4bab 


4bac 
4baft 
4bbé 


4bbl 
4bb3 
4bb4 
4bb5 
4bb6 


4BBa 


GeO 
c3a74b 


210000 
79 
feg4 
ag 


e602 
32664c 
79 
e661 
b7 
ca924b 
3e30 


47 
21684c 
Je 
e6cf£ 
b@ 

vi 


aT 
29 

29 

29 

29 
11334a 
19 

c9 


216a4c 
Ta 
c9 


216b4c 
71 
c9 


0606 
eb 

09 

Je 
326b4c 


&§ 


: treat as track 90 seek 


mvi c,@ 
jmp settrk 
seldsk: ;select disk given by register c 
lxi h,@@@0h ;return 0000 if error 
Mov a,c 
epi ndisks ;too large? 
rnc sleave hl = 0000 
ani 1léb 700 @®@ for drive @,1 and 18 108 fo 
sta dbank sto select drive bank 
mov a,c 2:06, 1, 10, ll 
ani lb smds has @,1 at 78, 2,3 at 88 
ora a sresult 06? 
42 setdrive 
mvi a, ®@G@116808b selects drive 1 in bank 
setdrive: 
mov b,a ssave the function 
lxi h, Loft :io function 
mov a,m 
ani 118@61111b smask out disk number 
ora b :mask in new disk number 
mov m,a ssave it in iopb 
AGY Arg shl=disk number 
dad h 2*2 
dad h 2*4 
dad h 2 *8 
dad h :*16 
lxi d,dpbase 
dad d :hl=disk header table address 
ret 


° 
’ 


; 
settrk: ;set track address given by c 


Pst h, Lot 
mov m,c 
ret 


’ 
setsec: ;set sector number given by c 


lxi h,ios 
mov m,¢ 
ret 
sectran: 

stranslate sector bc using table at de 
mvi b,@ ;double precision sector number i 
xchg stranslate table address to hl 
dad b stranslate(sector) address 
mov a,m ;translated sector number to a 
sta ios 
mQ l,a ;return sector number in 1 


, 
setdma: ;set dma address given by regs b,c 
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4bbb 
4bbe 
4bbd 
4bc@ 


4bcl 
4bc3 
4bc6 
4bc9 


4bca 
4bcc 
4bcf 
4bd2 


4bd3 
4bd4 
4bd5 


4bd6 
4bd7 
4bd8 
4bdb 
4bdc 
4bdd 


4be®@ 
4be3 
4be4 
4be6 
4be7 


4be8 
4bea 
4bed 
4bee 
4bef 


4bf£O 


4bf£2 


4bf£5 
4bf8 


69 
68 
226c4c 
c9 


0e04 
cde@ 4b 
cdf84b 
c9 


0eB6 
cdeg 4b 
cdf#4b 
c9 


Je 
b7 
c8 


e5 
4f 
cd6a4b 
el 
23 
c3d34b 


eda 


cd3f4c 
cd4c4c 


3a664c 


=e se 


write: 


rmsg: 


; 
setfunc: 


’ 


=e se 


’ 
waitio: 


rewait: 


=e 


mov 1;¢ 
mov h,b 
shld iod 
ret 


;read next disk record (assuming disk/trk/sec/dma 


mvi c,readf ;set to read function 

call setfunc 

call waitio ;perform read function 

ret ;may have error set in reg-a 


:;disk write function 


mvi c,writf 

call setfunc ;set to write function 
call waitio 

ret ;may have error set 


utility subroutines 
sprint message at h,l to @ 


mov a,m 
ora a 3; Zero? 
rz 

more to print 

push h 

Mov c,a 

call conout 

pop h 

inx h 

jmp prmsg 


set function for next i/o (command in reg-c) 


lxi h,iof ;io function address 

mov a,m ;get it to accumulator for maskin 
ani 11111908b ;remove previous command 
ora C ;set to new command 

mov m,a ;replaced in iopb 


the mds-868 controller req's disk bank bit in sec 
mask the bit from the current i/o function 


ani OB1G6800b smask the disk select bit 
lxi h,ios saddress the sector selec 
ora m ;select proper disk bank 
mov m,a ;set disk select bit on/o 
ret 

mvi c,retry ;max retries before perm error 


Start the i/o function and wait for completion 
call intype ;in rtype . 
call inbyte ;clears the controller 


lda dbank ;set bank flags 
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4bfb 
4bfc 
4bfe 
4c00 
4c03 
4c05 
4c66 
4c08 


4c0b 
4c0d 
4cBe 


4cl® 
4cl3 
4cl5 


4cl8 


4clb 
4cld 


4c20 
4c21 


4c24 
4c27 
4c28 
4c2b 
4c2c 
4c2e 


4c31 


4c32 
4c35 


b7 
3e67 
G64c 
c20b4c 
d379 
78 
d37a 
c3104c 


d389 
78 
d38a 


cd594c 
e604 
cal@4c 


cd3f4c 


£feG2 
ca324c 


b7 
c2384c 


e6fe 
c2384c 


c9 


cd4c4c 
c3384c 


=e se 


= 
o 
fa) 
n 
° 
i | 


=e se se Se Se Se Se Se Se Ne 


ora a :zero if drive 9,1 and nz 


mvi a,iopb and @ffh ;low address for iopb 

mvi b,iopb shr 8 shigh address for iopb 
jnz iodrl :drive bank 1? 

out ilow slow address to controlle 
mov a,b 

out ihigh shigh address 

jmp waitd ;to wait for complete 


sdrive bank l 


out ilow+1®@h 788 for drive bank 16 
mov a,b 

out ihight+1l@h 

call instat ;wait for completion 

ani iordy ;ready? 

jz waitd 

check io completion ok 

call intype ;must be io complete (886) 
@@ unlinked i/o complete, 81 linked i/o comple 
1@ disk status changed 11 (not used) 

cpi 16b ;ready status change? 

at wready 


must be @@ in the accumulator 
ora a 
jnz werror ;some other condition, re 


check i/o error bits 
call inbyte 


ral 

j< wready ;unit not ready 
rar 

ani 11111116b gany other errors? 
jnz werror 


read or write is ok, accumulator contains zero 
ret 


"snot ready, treat as error for now 
Call inbyte ;Cclear result byte 
jmp trycount 


;return hardware malfunction (crc, track, seek, e 
the mds controller has returned a bit in each pos 
of the accumulator, corresponding to the conditio 
- deleted data (accepted as ok above) 

- cre error 

- seek error 

- address error (hardware malfunction) 
data over/under flow (hardware malfunct 
- write protect (treated as not ready) 

- write error (hardware malfunction) 

- not ready 


SAU PWNHEeH DB 
| 
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4c38 
4c39 


4c3c 
4c3e 


4c3f 
4c42 
4c43 
4c46 
4c48 
4c49 
4c4b 


4c4c 
4c4f£ 
4c5®@ 
4c53 
4c55 
4c56 
4c58 


4c59 
4c5c 
4c5d 
4c6@ 
4c62 
4c63 
4c65 


4c66 


4c67 
4c68 
4c69 
4c6a 
4c6b 
4c6c 


0d 
c2£24b 


3e81 
c9 


3a664c 
b7 
c2494c 
db79 
c9 
db89 
c9 


3a664c 
b7 
c2564c 
db7b 
c9 
db8b 
c9 


3a664c 
b7 
c2634c 
db78 
c9 
db88& 
c9 


08 


80 
04 
01 
G2 
O61 
80008 


se Cf se se se se se we 


=e te 


; 
; 
intype: 


intypl: 


inbyte: 


inbytl: 


, 
instat: 


instal: 


=e =e =e 


dbank: 
iopb: 


iof: 
ion: 
iots: 
ios: 
iod: 


=e se te 


(accumulator bits are numbered 7 6 5 43 21 @6) 


it may be useful to filter out the various condit 
but we will get a permanent error message if it i 
recoverable, in any case, the not ready conditio 
treated as a separate condition for later improve 


rycount: 


register c contains retry count, decrement ‘til z 
dcr c 
jnz rewait ;for another try 


cannot recover from error 
mvi a,l serror code 
ret 


intype, inbyte, instat read drive bank @@ or 190 
lda dbank 


ora a 

jnz intypl ;skip to bank 186 
in rtype 

ret 

in rtype+tl@h 378 for 0,1 88 for 2,3 
ret 

lda dbank 

ora a 

jnz inbytl 

in rbyte 

ret 

in rbyte+10h 

ret 

lda dbank 

ora a 

jnz instal 

in dstat 

ret 

in dstat+10h 

ret 


data areas (must be in ram) 


db ) :disk bank @@ if drive 9,1 
: 16 if drive 2,3 

310 parameter block 

db 80h ;normal i/o operation 

db readf sio function, initial read 

db a snumber of sectors to read 

db offset ;track number 

db il, sector number 

dw buff ;i0 address 


define ram areas for bdos operation 


48 


endef 


4c6et+= begdat equ $ 

4c6et+ dirbuf: ds 128 ;directory access buffer 
4ceet alv@: ds 31 

4d@d+ csv@: ds 16 

4dld+ alvl: ds 31 

4d3ct+ csvl: ds 16 

4d4ct+ alv2: ds 31 

4d6b+ csv2: ds 16 

4d7b+ alv3: ds 31 

4d9at+ csv3: ds 16 
4daat= enddat equ $ 

013ct= datsiz equ $-begdat 
4daa_ end 
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0614 


OBBB 
3400 
3c06 
4aBO 
G04 
0883 


4a00 
OB2c 


4a0@ 
4aG3 
4aW6 
4a09 
4adc 
4abft 
4al12 
4al5 
4al8 
4alb 
4ale 
4a21 
4a24 
4a27 
4a2a 
4a2d 
4a36 


4a33 
4a37 
4a3b 
4a3f 


4a43 
4a47 
4a4b 
4a4f 


4a53 
4a57 
4a5b 
4a5£ 


c39c4a 
c3a64a 
c3114b 
c3244b 
c3374b 
c3494b 
c34d4b 
c34f4b 
c3544b 
c35a4b 
c37d4b 
c3924b 
c3ad4b 
c3c34b 
c3d64b 
c34b4b 
c3a74b 


734aGO 
NT) 
£04c8d 
ec4d7@ 


734a00 
TT) 
£04c8d 
f£c4d8f 


734a0B 
Oe ) 
£04c8d 
Oc4eae 


size 


se se se Sse se 


wboote: 


pbase: 


=e 


=e 


APPENDIX C: A SKELETAL CBIOS 
skeletal cbios for first level of cp/m 2.0 altera 
equ 20 ;cp/m version memory size in kilo 


“bias" is address offset from 34@0@h for memory sy 
than 16k (referred to as “b" throughout the text) 


equ (msize-2@) *1924 

equ 3460h+bias ;base of ccp 

equ ccp+8@6h s;base of bdos 

equ ccpt+1600h sbase of bios 

equ 0004h ;current disk number @=a,...,15=p 
equ G083h ;intel i/o byte 

org bios ;origin of this program 

equ ($-ccp) /128 swarm start sector count 


jump vector for individual subroutines 


jmp boot ;cold start 

jmp wboot swarm start 

jmp const sconsole status 

jmp conin ;console character in 
jmp conout ;console character out 
jmp list slist character out 
jmp punch s;punch character out 
jmp reader ;reader character out 
jmp home ;move head to home positi 
jmp seldsk ;select disk 

jmp settrk ;set track number 

jmp setsec ;set sector number 

jmp setdma s;set dma address 

jmp read ;read disk 

jmp write ;write disk 

jmp listst ;return list status 
jmp sectran ;sector translate 


fixed data tables for four-drive standard 
ibm-compatible 8" disks 
disk parameter header for disk #9 


dw trans,@@00h 
dw 0000h,8800h 
dw dirbf ,dpblk 
dw chk@@,a110@ 
disk parameter header for disk @1 
dw trans,9080h 
dw 0600h,888Gh 
dw dirbf ,dpblk 
dw chk@1,a1191 
disk parameter header for disk 62 
dw trans,8908h 
dw G8880h,8008h 
dw dirbf,dpblk 
dw chk@2,a1182 
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4a63 
4a67 
4a6b 
4a6f 


4243 
4a7b 
4a7ft 
4a83 
4a87 
4a8b 


4a8d 
4a8f 
4a9@ 
4a9l1 
4a92 
4a94 
4a96 
4a97 
4a98 
4a9a 


4a9c 
4a9d 
4aad 
4aa3 


4aa6 
4aa9 
4aab 
4aae 


4abl 
4ab3 
4ab5 


4ab7 


4aba 
4abb 
4abc 
4abd 
4abe 
4acl 


734a0@ 
ry) 
£04c8d 
lc4ecd 


158588 
170369 
158208 
141a86 
121804 
1016 


00 
1906 
02008 


af 

328300 
328480 
c3ef4a 


318096 
GeGO 

cd5a4b 
cd544b 


062c 


0e00 
1602 


210034 


cd924b 
cl 


oe 


ct se se 


rans: 


dpblk: 


=e 


=e se 


loadl: 


disk parameter header for disk 03 


dw trans,@@00h 
dw 006Gh,800Gh 
dw dirbf,dpblk 
dw chk@3,a1163 


sector translate vector 


aB 2575; 21517 
db 


SSESES de g04 0G 


is 

23:,3,9,15 ssectors 9,19,11,12 
db 21,,2,;8,14 :;sectors 13,14,15,16 
db 20,26,6,12 s;sectors 17,18,19,290 
db 18,24,4,198 sectors 21,22,23,24 
db 16,,22 s;sectors 25,26 
;disk parameter block, common to all disks 
dw 26 ;sectors per track 
db 3 sblock shift factor 
db 7 ;block mask 
db 4) s;null mask 
dw 242 :disk size-l 
dw 63 ;directory max 
db 192 salloc @ 
db 4) callo¢e 1 
dw 16 scheck size 
dw 2 s;track offset 


end of fixed tables 


individual subroutines to perform each function 
;simplest case is to just perform parameter initi 


xra a ;zero in the accum 

sta iobyte ;clear the iobyte 

sta cdisk ;select disk zero 

jmp gocpm ;initialize and go to cp/ 
;Simplest case is to read the disk until all sect 
Lx sp,80h suse space below buffer f 
mvi c,Q s;select disk @ 

call seldsk 

call home 790 to track @0 

mvi b,nsects 3b counts # of sectors to 
mvi c,a ;c has the current track 
mvi G2 7d has the next sector to 


note that we begin by reading track @, sector 2 s 
contains the cold start loader, which is skipped 


lxi h,ccp ;base of cp/m (initial lo 
;load one more sector 

push b save sector count, current track 
push d ;save next sector to read 

push h ;save dma address 

mov c,d ;get sector address to register c 
call setsec ;set sector address from register 
pop b ;recall dma address to b,c 
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4ac2 
4ac3 


4ac6 
4ac9 
4acb 


4ace 
4acf 
4ad2 
4adq3 
4ad4 
4ad5 
4ad6 


4adq9 
4ada 
4adb 
4add 


4aed 
4ae2 


4ae3 
4ae4 
4ae5 
4ae6 
4ae9 
4aea 
4aeb 
4aec 


4aef 
4afl 
4af4 
4af7 


4afa 
4afd 
4b0a 


4b03 
4bO6 © 


4b09 
4b@a 
4b0d 
4b@e 


e5 
cdad4b 


cdc34b 
fesgo 
c2a64a 


el 
118900 
19 
dl 
cl 
85 
caef4a 


14 

7a 
felb 
daba4a 


1661 
Oc 


e5 
dqg5 
e5 
cd7d4b 
el 
dl 
ol 
c3ba4a 


3ec3 

3200008 
21034a 
220106 


320508 
21063c 
220660 


018000 
cdad4b 


fb 
3aG 400 
4f 
c30034 


se se 


=e se 


=e se 


=e se 


W se se 
ie} 
us 
3 


=. 


=e 


push b ;replace on stack for later recal 
eall setdma ;set dma address from b,c 


drive set to @, track set, sector set, dma addres 
call read 

cpi OBh sany errors? 

jnz wboot ;retry the entire boot if an erro 


no error, move to next sector 


pop h ;recall dma address 

lxi d,128 ;dma=dmat+128 

dad d ;new dma address is in h,l 

pop d ;recall sector address 

pop b ;recall number of sectors remaini 
dér b ;sectors=sectors-l 

jz gocpm ;transfer to cp/m if all have bee 


more sectors remain to load, check for track chan 
inr d 


mov a,d ;sector=27?, if so, change tracks 
cpi 27 

1¢ loadl scarry generated if sector<27 

end of current track, go to next track 

mvi ro om ;begin with first sector of next 
inr c ;track=track+l 


save register state, and change tracks 
push b 


push d 

push h 

call settrk ;track address set from register 
pop h 

pop d 

pop b 

jmp loadl ;for another sector 


end of load operation, set parameters and go toc 


mvi a,@c3h ;c3 is a jmp instruction 

sta M) ;for jmp to wboot 

1lxi h,wboote ;wboot entry point 

shld i! ;set address field for jmp at @ 
sta 5 ;for jmp to bdos 

Lzxi h,bdos ;bdos entry point 

shld 6 ;address field of jump at 5 to bd 
lxi b,8@h ;default dma address is 88h 

call setdma 

ei ;enable the interrupt system 

lda cdisk s;get current disk number 

mov Cc,a ;send to the ccp 

jmp ccp 790 to cp/m for further processin 
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4bl1l 
4b21 
4b23 


4b24 
4b34 
4b36 


4b37 
4b38 
4b48 


4b49 
4b4a 


4b4b 
4b4c 


4b4d 
4b4e 


4b4f 
4b51 
4b53 


4b54 
4b56 
4b59 


4b5a 
4b5d 
4b5e 
4b61 


3e08 
c9 


e67£ 
c9 


79 


c9 


79 
c9 


af 
c9 


79 
c9 


3ela 
e67£ 
c9 


VebD 
cd7d4b 
c9 


210060 
79 
32ef4c 
feb4 


Q se se se se se se 


onst: 


eader: 


se Dy se se we se Se Ne 


simple i/o handlers (must be filled in by user) 
in each case, the entry point is provided, with s 
to insert your own code 


;console status, return @ffh if character ready, 


ds 10h ;space for status subroutine 
mvi a,®@h 
ret 


;console character into register a 


ds 10h ;space for input routine 
ani 7fh ;strip parity bit 
ret 


;console character output from register c 


mov a,c ;get to accumulator 
ds 16h ;space for output routine 
ret 


s;list character 
mov a,c 
ret 


from register c 
;character to register a 
;null subroutine 


sreturn list status (@ if not ready, 1 if ready) 
xra a 7;@ is always ok to return 
ret 


;punch character from register c 
mov a,c ;character to register a 
ret snull subroutine 


;read character into register a from reader devic 


mvi a,lah senter end of file for now (repla 
ani 7fh ;remember to strip parity bit 
ret 


ifo drivers for the disk follow 
for now, we will simply store the parameters away 
in the read and write subroutines 


;move to the track @@ position of current drive 
translate this call into a settrk call with param 


mvi c,@ ;select track @ 
call settrk 
ret swe will move to @@ on first read 


;select disk given by register c 


Lx h,@09@@h ;error return code 

mov a,c 

sta diskno 

cpi 4 ;Must be between @ and 3 


a3 


4b63 
4b64 


4b6e 
4b71 
4b72 
4b74 
4b75 
4b76 
4b77 
4b78 
4b7b 
4b7c 


4b7d 
4b7e 
4b81 
4b91 


4b92 
4b93 
4b96 
4ba6 


4ba7 
4ba8 
4ba9 
4baa 
4bac 


4bad 
4bae 
4baf 
4bb2 
4bc2 


4bc3 
4bd3 


4bd6 


dg 


3aef4c 
6f 
2600 
29 

29 

29 

29 
11334a 
19 

c9 


79 
32e94c 
c9 
79 
32eb4c 
c9 


eb 
09 
6e 
2600 
c9 


69 
60 
22ed4c 


c9 


c3e64b 


rnc gno carry if 4,5, «0. 
: disk number is in the proper range 


ds 16 ;space for disk select 
: compute proper disk parameter header address 
lda diskno 
mov l,a ;l=disk number @,1,2,3 
mvi h,@ shigh order zero 
dad h 7*2 
dad h 2*4 
dad h 2*8 
dad h 3*16 (size of each header) 
lxi d,dpbase , 
dad d ;hl=.dpbase(diskno*l16) 
ret 


settrk: ;set track given by register c 


mov a,c 

sta track 

ds 16h ;space for track select 
ret 


Ul 
setsec: ;set sector given by register c 


mov a,c 
sta sector 
ds 10h ;space for sector select 
ret 

; 

sectran: 


;translate the sector given by bc using the 
;translate table given by de 


xchg shl=.trans 

dad b shl=.trans(sector) 
mov 1,m ;1 = trans(sector) 
mvi h,@ shl= trans(sector) 
ret swith value in hl 


setdma: ;set dma address given by registers b andc 


mov Al 9 :;low order address 
mov h,b shigh order address 
shld dmaad ;save the address 
ds 16h ;Space for setting the dma addres 
ret 
, 
read: ;perform read operation (usually this is similar 
: so we will allow space to set up read command, th 
; common code in write) 
ds 16h ;set up read command 
jmp waitio ;to perform the actual i/o 
’ 
write: ;perform a write operation 


ds 16h ;set up write commanu 

; 

waitio: ;enter here from read and write to perform the ac 
operation, return a @@h in register a if the ope 


properly, and @lh if an error occurs during the r 


=e te 
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4be6 
4ce6 
4ce8 


4ce9 
4ceb 
4ced 
4cef 


4cfO 
4cf@ 
4078 
4d8f 
4dae 
4dcd 
4dec 
4dfc 
4edc 
4elc 


4e2c 
@13c 
4e2c 


3e81 
c9 


=e ~e =e we TO 


e =e =e te Te TE 


, 

tracks 
sectors 
dmaad: 
diskno: 


’ 


begdat 
dirbf: 
all@@: 
all@l: 
all@2: 
all@3:; 
chk@@: 
chk@l: 
chk@2: 
chk@3: 


; 
enddat 
datsiz 


in this case, we have saved the disk number in 'd 


ds 
mvi 
ret 


256 


a,l 


the track number in ‘track’ (0-76 
the sector number in ‘sector’ (l- 
the dma address in 'dmaad’ (0-655 
;space reserved for i/o drivers 
serror condition 

;replaced when filled-in 


the remainder of the cbios is reserved uninitiali 
data area, and does not need to be a part of the 
system memory image (the space must be available, 
however, between “begdat" and “enddat"). 


;two bytes for expansion 
;two bytes for expansion 
;direct memory address 
:;disk number @-15 


scratch ram area for bdos use 


;beginning of data area 
;scratch directory area 
sallocation vector @ 

sallocation vector 
sallocation vector 
;allocation vector 
scheck vector 
scheck vector 
scheck vector 
scheck vector 


WNF 


WHFS 


send of data area 


$-begdat;size of data area 


ds 2 
ds 2 
ds 2 
ds 1 
egu $ 
ds 128 
ds a 
ds 31 
ds 31 
ds 31 
ds 16 
ds 16 
ds 16 
ds 16 
equ $ 
equ 

end 
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APPENDIX D: A SKELETAL GETSYS/PUTSYS PROGRAM 


combined getsys and putsys programs from Sec 4, 
Start the programs at the base of the TPA 


=e se 


0190 org 9190h 


9014 = msize egu 20 ; size of cp/m in Kbytes 


; “bias" is the amount to add to addresses for > 20k 
: (referred to as "b"“ throughout the text) 


8000 = bias equ (msize-20) *1024 
3408 = ccp equ 3400h+bias 
3c08 = bdos equ ccpt+@88Gh 
4a00 = bios equ ccp+16@0h 

H getsys programs tracks #@ and 1 to memory at 

; 388@h + bias 

: register usage 

: a (scratch register) 

: b track count (@...76) 

: ¢ sector count (1...26) 

: d,e (scratch register pair) 

: h,l load address 

: sp set to stack address 

gstart: ; Start of getsys 
8108 318933 Lx sp,ccp-@080h ; convenient plac 
8103 218033 1lxi h,ccp-9988h ; set initial loa 
0196 8600 mvi b,@ ; Start with trac 

rd$trk: ; read next track 
0108 Bebl mvi c,1 * each track star 

rd$sec: 
81a cdBO83 call read$sec ; get the next se 
810d 118600 lxi d,128 ; offset by one s 
0118 19 dad d : (hl=h1+128) 
8111 Oc inr c ; next sector 
0112 79 mov a,c ; fetch sector nu 
6113 felb epi 27 : and see if la 
0115 da@adl jc rdsec ; <, Go one more 

: arrive here at end of track, move to next track 
0118 94 inr b s track = track+tl 
0119 78 mov a,b : check for last 
Blla feG2 cpi 2 ; track = 2 ? 
@llc da@8@l1 4i¢ rdStrk : <, do another 

; arrive here at end of load, halt for lack of anything b 
Q11f fb ei 
0120 76 hilt 
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0200 


0200 
9203 
0266 


6208 


02a 
920d 
9219 
@211 
0212 
9213 
9215 


8218 
8219 
O®2la 
@21c 


O21f 
9220 


0308 


0308 
9301 
8362 


0342 
0343 


318633 
218033 
0606 


GeGl 


cd8OG4 
118800 
19 

Oc 

79 
felb 
daGaG2 


04 

78 
feG2 
da®802 


fb 
76 


el 


=e se te 


org 


put$sys: 
lxi 
lxi 
mvi 

wrS$trk: 
mvi 

wrssec: 
call 
Li 
dad 
inr 
mov 
cpi 
4I¢ 


; arrive here at end of track, move to 


inr b 
Mov a,b 
cpi 2 
jc wr$trk: 
; done with putsys, halt for lack 
ei 
hlt 


($+0100h) and O@ff0OHh 


sp,ccp-@980h 
h,ccp-@980h 
b,@ 

Cyd 


writeSsec 
d,128 


wrSsec 


=e se se 


=e 


=e se se se Se te Se 


putsys program, places memory image starting at 
3888h + bias back to tracks @ and l 
start this program at the next page boundary 


convenient plac 
start of dump 
start with trac 


start with sect 


write one secto 
length of each 
<hl>=<hl> + 128 
<ce> = <a> + 1 
see if 

past end of t 
no, do another 


next track 


=e se se Se 


track = track+l 
see if 

last track 
no, do another 


of anything bette 


; user supplied subroutines for sector read and write 


org 


readS$sec: 


move to next page boundary 


($+@100h) and @££0Gh 


read the next sector 


=e se se se 


push b 
push h 
; user defined read operation goes here 
ds 64 
pop h 
pop b 


track in <b>, 
sector in <c> 
dmaaddr in <hl> 


a7 


6344 
0400 


0400 
0401 
8402 
0442 


0443 
0444 


9445 


c9 


c5 
e5 


ret 
org ($+8100h) and @f£0Hh 
writeSsec: 


; Same parameters as read$sec 


push b 
push h 
; user defined write operation goes here 
ds 64 
pop h 
pop b 
ret 


; end of getsys/putsys program 


end 
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e 
’ 


another page bo 


0080 


0014 = 


BQBOO 
3400 
4a0@ 
0300 
4a0G 
1960 
0832 


0008 
0003 
0005 


910200 
1632 
218634 


=e se Se Se Se SO 8 Se Se Se Se Se TO TE TO NE Se Se 


APPENDIX E: A SKELETAL COLD START LOADER 


this is a sample cold start loader which, when modified 
resides on track @@, sector @1 (the first sector on the 
diskette). we assume that the controller has loaded 
this sector into memory upon system start-up (this pro- 
gram can be keyed-in, or can exist in read/only memory 
beyond the address space of the cp/m version you are 
running). the cold start loader brings the cp/m system 
into memory at “loadp" (34@0h + “bias"). in a 20k 
memory system, the value of “bias” is 0006h, with large 
values for increased memory sizes (see section 2). afte 
loading the cp/m system, the clod start loader branches 
to the "boot" entry point of the bios, which begins at 
"bios" + “bias." the cold start loader is not used un- 
til the system is powered up again, as long as the bios 
is not overwritten. the origin is assumed at 900@h, an 
must be changed if the controller brings the cold start 
loader into another area, or if a read/only memory area 
is used, 


org 7) ; base of ram in cp/m 
msize equ 20 ; Min mem size in kbytes 
bias equ (msize-20) *1024 ; offset from 20k system 
ccp equ 3490h+bias ; base of the ccp 
bios equ ccp+16@8h ; base of the bios 
biosl equ 6360h ; length of the bios 
boot egu bios 
size equ bios+biosl-ccp ; size of cp/m system 
sects equ size/128 ; # of sectors to load 


=e 


begin the load operation 


cold: 
lxi b,.2 ; b=0@, c=sector 2 
mvi d,sects ; d=# sectors to load 
xi h,cep ; base transfer address 


lsect: ; load the next sector 


=e se Se se se se SO 


insert inline code at this point to 
read one 128 byte sector from the 
track given in register b, sector 
given in register c, 

into the address given by <hl> 


branch to location "cold" if a read error occurs 
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0008 
OOBb 


006b 
006c 


O06f 
0072 


0073 
0074 
9875 
0077 


OB7a 
O@07c 
007d 
0086 


c36b00 


15 
caéQ4a 


3180080 
39 


dad 800 


BeG1 
64 
c30800 


=e =e =e se se 


KEKKKEKEKKEKEEEKKEKKKKEEREKEEKEKKKKKKEKKKKKKRKRKKKKEKKKKKKEE 
* 
* user supplied read operation goes here... 
* 
REKKKKEKKEKEKEKEKEEKKEKEKEKKEKKKKKKKKKRKKRKKKKKKKKRKKKRKKKKKKEE 


jmp past$patch ; remove this when patche 
ds 68h 
past$patch: 


’ 


=e se =e te 


go to next sector if load is incomplete 
dcr d ; sects=sects-1l 
42 boot ; head for the bios 


more sectors to load 


we aren't using a stack, so use <sp> as scratch registe 
to hold the load address increment 


NTE op sp,128 ; 128 bytes per sector 
dad sp ; <hl> = <hl> + 128 

inr c ; sector = sector + l 
mov a,c 

cpi 27 ; last sector of track? 
i<¢ lsect ; no, go read another 


end of track, increment to next track 


mvi Gel ; sector = 1 

inr b 3 track = track + 1 
jmp lsect ; for another group 
end : of boot loader 
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APPENDIX F: CP/M DISK DEFINITION LIBRARY 


CP/M 2.0 disk re-definition library 


Copyright (c) 1979 
Digital Research 
Box 579 

Pacific Grove, CA 
93956 


CP/M logicel disk drives are defined using the 


macros given below, where the sequence of calls 
is: 


disks n 

diskdef oarameter-list-9% 
diskdef parameter-list-l 
diskdet parameter-list-n 
endef 


where n is the number of logical disk drives attached 
to the CP/M system, and parameter-list-i defines the 
characteristics of the ith drive (i=#,1,...,n-1) 


each parameter-list-i takes the form 
dn,tsc,lsc,([skf] ,o1s,dks,dir,cks,ofs, [8] 


where 

dn is the disk number @,1,...,n-l 

fsc is tue first sector number (usually @ or 1) 
lsc is tne last sector number on a track 

skf is optional “skew factor” for sector translate 
bls is tne data block size (1024,2048,...,16384) 
dks is tne disk size in bls increments (word) 

air is tne number of directory elements (word) 

cks is tne number of dir elements to checksum 

ofs is the number of tracks to skip (word) 

[@] is an optional @ which forces 16K/directory en 


for convenience, the form 

dn,dm 
defines disk dn as having the same characteristics as 
a previously defined disk dm, 


a standard four drive CP/M system is defined by 


disks 4 

diskdef @,1,26,6,1024,243,64,64,2 
dsk set G 

rept 3 
dsk set dsk+l1l 

diskdef %dsk,@ 

endm 

endec 


the value of “begdat" at the end of assembly defines t 
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Qs. =e se Se se Se we tO 


Qin 
UT~- Nn 
0) 

Q 

Q. 

pe | 


ndisks 
dpbase 
Hip 


dsknxt 


dsknxt 


dpbhdr 
dpb&dn 


=e se ee CQ) 


beginning of the uninitialize ram area above the bios, 
while the valve of “enddat" defines the next location 

following the end of the data area, the size of this 

area is given by the value of “datsiz" at the end of t 
assembly. note that the allocation vector will be qui 
large if a large disk size is defined with a small blo 
size, 


macro dn 
define a single disk header list 


dw xlt&dn,6@90Gh ;translate table 

dw G9G0h, JOGGh ;scratch area 

dw dirbuf,dpbé&dn ;dir buff,parm block 
dw csv&an,alvédn ;check, alloc vectors 
endm 


macro nd 
define nd disks 


set nd ;;for later reference 

equ $ ;base of disk parameter blocks 
generate the nd elements 

set 4) 

rept nd 

dskhdr %dsknxt 

set dsknxct+l 

endm 

endm 


macro dn 
equ $ ;disk parm block 
endm 


macro data,comment 

define a db statement 

db data comment 

endm ; 


macro data,comment 

define a dw statement 

dw data comment 
endm 


macro -m,n 

greatest common divisor of m,n 

produces value acdn as result 

(used in sector translate table generation) 


set m :;variable for m 

set n ;;variable for n 

set "1 ;;variable for r - 
rept 65535 = 
set gcdm/gcdn 

set gcdm - gcdx*gcdn 

if gcdr = @ 

exitm 

endif 
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1909: 
116: 
Tl: 
Li2s 
Liss 
114: 
115: 
116: 
117: 
118: 
119; 
126: 
L212 
Lae 
123: 
124: 
125: 
126: 
127: 
128: 
1293 
138: 
131: 
132: 
Lose 
134: 
L352 
136: 
Lats 
138: 
139: 
-146: 
141; 
142: 
143: 
144: 
145; 
146: 
147: 
148: 
1493 
156: 
L51: 
152: 
153% 
154: 
155: 
156: 
157: 
1583 
159: 
166: 
161: 
162: 
163: 


css&dn 
xlté&dn 


secmax 
sectors 
als&dn 
als&dn 


css&dn 


blkval 


77 
plkval 
extmsk 


extmsk 
blkval 


ta 
extmsk 
ad 

extmsk 


ee 
s¢ 


dirrem 


set gcdn 
set gcdr 
endm 
endm 


macro dn,fsc,lsc,skf,bls,dks,dir,cks,ofs,kl6 
generate the set statements for later tables 
if nul lsc 

current disk dn same as previous fsc 


equ dpb&fsc ;eaquivalent parameters 

equ als&fsc ;same allocation vector size 
equ css&f£sc ;same checksum vector size 
equ xlt&fsc ;same translate table 

else 

set lsc-(fsc) ;;sectors 0...secmax 
set secmaxt+tl;;number of sectors 

set (dks)/8 ;;size of allocation vector 
if ((dks) mod co) ne @ 

set als&dn+l 

endif 

set (cks)/4 ;:number of checksum elements 
generate the block shift value 

set bls/128 ;;number of sectors/block 
set 7) s;counts right @'s in blkval 
set i) :;cills with 1's from right 
rept 16 ;;once for each bit position 
LE blkval=1 

exitm 

endif 

otherwise, high order 1 not found yet 

set blkshf+1 

set (blkmsk shl 1) or 1 

set blkval/2 

endm 

generate the extent mask byte 

set b1s/1624 ;;number of kilobytes/block 
set ) :;fiil from right with l's 
rept 16 

LE blkval=1 

exitm 

endif 

otherwise more to shift 

set (extmsk shl 1) or 1 

set blkval/2 

endm 

may be double byte allocation 

if (dks) > 256 

set (extmsk shr 1) 

endif 

may be optional [@] in last position 

LE not nul k16 

set k16 

endif 

now generate directory reservation bit vector 
set dir ;;# remaining to process 
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164: 
165: 
166: 
167: 
168: 
169: 
1708: 
L718 
172: 
LIS 
174: 
175: 
176: 
177: 
178: 
179: 
180: 
L381: 
182: 
183: 
184: 
13853 
186: 
187: 
188: 
189: 
190: 
191: 
192: 
193: 
194: 
1953 
196: 
1973 
198: 
1993 
260: 
291: 
202: 
203: 
204: 
205: 
206: 
207: 
208: 
209: 
216: 
211: 
212: 
213% 
214: 
2153 
216: 
217% 
ZL: 


dirbks 
dirblk 


=e se 
=e te 


dirblk 
dirrem 


dirrem 


77 
xilt&dn 
xlt&dn 
77 


nxtsec 
nxtbas 


ltst 


ese > at 
ee (DM =e 


nelts 
xlté&dn 


nxtsec 
nxtsec 


nelts 


set bls/32 ;;number of entries per block 
set 0 ¢7f£i11 with 1's on each loop 
rept 16 

if dirrem=d 

exitm 

endif 


not complete, iterate once again 
shift right and add i high order bit 


set (dirblk shr 1) or &900h 
if dirrem > dirbks 

set dirrem-dirbks 

else 

set 4) 

endif 

endm 

dpbhdr dn s;;generate equ $ 
ddw $sectors,<;sec per track> 
ddb $olkshf,<;blcck shift> 
ddb $olkmsk,<;bleck mask> 

ddb gextmsk,<;extnt mask> 

ddw %(dks)-1,<;aisk size-1> 
dadw $(dir)-l1,<;airectory max> 
ddb @dirodlk shr 8,<;:alloc#> 
ddb $dirblk ana Of£h,<;allocl> 
ddw %(cks)/4,<;check size> 
ddw %ofs,<;offset> 


generate the translate table, if requested 
if nul skf 


equ 0 sno xlate table 
else 

if skf = @ 

equ ) sno xlate table 
else 

generate the translate table 

set Mi) s;;next sector to fill 
set ”) s;;mcves by one on overflow 
gcd $sectors,skf 

gcdn = gcd(sectors,skew) 

set sectors/gcdn 


neltst is number of elements to generate 
before we overlap orevious elements 


set neltst ;;counter 

equ $ stranslate table 
rept sectors ;;once for each sector 
if sectors < 256 

ddb $nxtsec+(fsc) 

else 

ddw $nxtsect(fsc) 

endif 

set nxtsect+(skE£) 

i nxtsec >= sectors 

set nxtsec-sectors 

endif 

set nelts-1l 

lite nelts = @ 
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nxtbas 
nxtsec 
nelts 


: Gsknxt 


: dsknxt 


enddat 
datsiz 


set 
set 
set 
endif 
endm 
endif 
endif 
endm 


macro 
ds 
endm 


macro 


aefds 
endm 


macro 


nxtbastiL 
nxtbas 
neltst 


s:;end of nul fac test 
;;end of nul bls test 


lab,space 
space 


lb,dn,val 
lb&dn, ¢val&dn 


generate the nec2ssary ram data areas 


equ 
ds 
set 
rept 
lds 
lds 
set 
endm 
equ 
egu 


$ 

128 ;directory access buffer 
7) 

ndisks ;;o0nce for eacn disk 
alv,%dsknxt,als 

csv,%dsknxt,css 

dsknxt+l 


$ 
$-begdat 


db @ at this point forces hex record 


endm 
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APPENDIX G: BLOCKING AND DEBLOCKING ALGORITHMS, 


g RRR KKK ERK KKK EKER KERR KEKE KEKE RERKERKKEEREKREKKEEKKKKEKEKER 


7* * 
’ 
;* Sector Deblocking Algorithms for CP/M 2.8 7 
ox * 
PSIG GIGI IIIS IIIS IGIIOIOIOIOIOIOICIOOCCCOOTCICICTOCICIO I I I 
; 
; utility macro to compute sector mask 
smask macro hblk 
3 compute log2(hblk), return @x as result 
23 (2 ** @x = hblk on return) 
@y set hblk 
@x set Y) 
3 count right shifts of @y until = 1 

rept 8 

if @y = 1 

exitm 

endif 
e% @y is not 1, shift right one position 
@y set @y shr l 
@x set @x + 1 

endm 

endm 
BGIIIIIOICICIGI GI IICICICCICI GIGI GIOCICICG ICICI OIC III III III IC 
7* * 
p* CP/M to host disk constants * 
* * 
ett t ett titi ttt ttt ttt ttt ttt ttt tt ttt ttt ttt ttt ttt tts 
blksiz equ 2048 :;CP/M allocation size 
hstsiz equ 512 shost disk sector size 
hstspt equ 20 shost disk sectors/trk 
hstblk equ hstsiz/128 CP/M sects/host buff 
cpmspt equ hstblk * hstspt ;CP/M sectors/track 
secmsk equ hstblk-1 ;sector mask 

smask hstblk ;compute sector mask 
secshf egu @x ;log2 (hstblk) 
BICC CCICCICOOGIGIIOI ISIS I ICICI III EK 
* * 
t 
3% BDOS constants on entry to write * 
7* * 
(SISSIES III III III IER 
wrall equ Y) ;write to allocated 
wrdir equ 1 ;write to directory 
wrual equ 2 ;write to unallocated 


' 
g BRK KKKKEK KEKE KKK KKK KR KEKE KKK KEK KE KKEKEKEKRKEKEKKEKKKEKKEKER 


7* * 
hed The BDOS entry points given below show the * 
5” code which is relevant to deblocking only. i 
x * 


‘ 
eo KRKKKEKKKEKEKEKEKEKEKEKKEKEKEKKEKEKEKKEKKEKKKKKKKEKKKKKEKKKKKEE 
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54: ; DISKDEF macro, or hand coded tables go here 
55: dpbase equ $ ;disk param block base 
56: ; 

57: boot: 

58: wboot: 


59's ;enter here on system boot to initialize 
60: xra a 7@ to accumulator 
61: sta hstact shost buffer inactive 
62: sta unacnt ;clear unalloc count 
63: ret 

64: ; 

65: seldsk: 

66: ;select disk 

673 mov a,¢ selected disk number 
68: sta sekdsk sseek disk number 
69: Mov La :disk number to HL 
70: mvi h,@ 

vis rept 4 smultiply by 16 
72: dad h 

pe endm 

74: lxi d,dpbase ;base of parm block 
158 dad d ;hl=.dpb(curdsk) 
76: ret 

77s 3: 

78: settrk: 

792 ;set track given by registers BC 

80: mov hb 

81: mov kL, ¢ 

82: shld sektrk s;track to seek 

83's ret 

843°; 

85: setsec: 

86: ;set sector given by register c 

87: mov a,c 

88: sta seksec s;sector to seek 
89: ret 

90: ; 

91: setdma: 

92: ;set dma address given by BC 

93: mov h, b 

94; mov Lye 

953 shld dmaadr 

96: ret 

97: ; 

98: sectran: 

99: ;translate sector number BC 
100: mov hiz.b 

101: mov L,¢ 

182: ret 

193: ; 
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104: 
165: 
106: 
107: 
1068: 
109: 
118: 
lll: 
112: 
113: 
114: 
115: 
116: 
Live 
118: 
119; 
126: 
121s 
122: 
123% 
124: 
125: 
126: 
127: 
128: 
129: 
130: 
131: 
L323 
133: 
134: 
135: 
136: 
137: 
138: 
139: 
140: 
141: 
142: 
143: 
144: 
145: 
146: 
147: 
148: 
149: 
158: 
L151 
152: 
153: 
154; 
L55¢ 
156: 
157: 
158: 


g RKEKKKKKEKKEKEEKKEEKRKRE ER KEKE EKER EKER ERKEERKEKEEKEKREREKREKE 


7* * 
i 
tie The READ entry point takes the place of = 
3* the previous BIOS defintion for READ, = 
7* * 
’ 


g RAKE KEKE KER ERE ERKEEEKREKREREKKEEKEEKRKKEEKKEEKKEEKK 
read: 


;read the selected CP/M sector 

mvi a,l 

sta readop ;read operation 

sta rsflag ;must read data 

mvi a,wrual 

sta wrtype ;treat as unalloc 

jmp rwoper ;to perform the read 
DAG ISIGI GIGS GIGIGI GI CICICIGICICIIOIOIS III ICICI ICICI III IIR 
7* * 
’ 
2% The WRITE entry point takes the place of - 
;* the previous BIOS defintion for WRITE. * 
7* * 


- 


g RRR KKK KEKE KEE KK KK ERK KER EKEREKERKRERKEEKKERKER 


write: 
swrite the selected CP/M sector 


xra a 78 to accumulator 

sta readop snot a read operation 
mov ane ;write type inc 

sta wrtype 

cpi wrual swrite unallocated? 
jnz chkuna ;check for unalloc 


=e =e 


write to unallocated, set parameters 


mvi a,blksiz/128 snext unalloc recs 
sta unacnt 

lda sekdsk ;disk to seek 

sta unadsk s;unadsk = sekdsk 
lhlid sektrk 

shld unatrk sunatrk = sectrk 
lda seksec 

sta unasec sunasec = seksec 


‘ 
chkuna: 
;check for write to unallocated sector 


lda unacnt zany unalloc remain? 
ora a 
jz alloc sskiv if not 

’ 

: more unallocated records remain 
dcr a sunacnt = unacnt-l 
sta unacnt 
lda sekdsk ;same disk? 
lxi h,unadsk 
cmp m ;sekdsk = unadsk? 
jnz alloc ;skip if not 


=e Se 


disks are the same 
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159: Lz h,unatrk 


160: call sektrkcmp s;sektrk = unatrk? 
161s jnz alloc ;skip if not 

162: ; 

163: ; tracks are the same 

164: lda seksec ;same sector? 

165: lxi h,unasec 

166: cmp m sseksec = unasec? 
167: jnz alloc sskip if not 

168: ; 

169: ; match, move to next sector for future ref 
170: inr m sunasec = unasectl 
171s mov a,m send of track? 

172: cpi cpmspt ;count CP/M sectors 
173s jc noovft ;skip if no overflow 
174: ; 

LtSe. ¢ overflow to next track 

L7 6% mvi m,@ sunasec = Q@ 

177: lhld unatrk 

178: inx h 

179: shld unatrk sunatrk = unatrk+l 
186: ; 

181: noovf: 

182: smatch found, mark as unnecessary read 

183: xra a ;@ to accumulator 
184: sta rsflag srsflag = @ 

185: jmp rwoper ;to perform the write 
186: ; 

187: alloc: 

188: snot an unallocated record, requires pre-read 
189: xra a 7;@ to accum 

198: sta unacnt sunacnt = Q 

191; inr a 71 to accum 

192: sta rsflag sxrsflag = 1 

cee TGIISIIGIGIGI IO ICICICCGCIGI GIGI SSISEI SISOS III IIIS III IE 
195: ;* - 
196: ;* Common code for READ and WRITE follows * 
197: ;:* * 
198: g RAK KK KEKE KKK KKK KEKE RK EKER KER KEKE RERERKEEKEKKKKKEKEKKKKKKEKE 
199: rwoper: 

200: ;enter here to perform the read/write 

201: xra a ;zero to accum 

202: sta erflag 7no errors (yet) 

203% lda seksec ;compute host sector 
204: rept secshf 

205: ora a ;carry = @ 

206: rar sshift right 

207: endm 

208: sta sekhst. s;host sector to seek 
2093: ; 

210: ; active host sector? 

Zale lxi h,hstact shost active flag 
212% mov a,m 

213: mvi m,l ;always becomes 1 
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214: 
215% 
216: 
217: 
218: 
219: 
220: 
221% 
222: 
223% 
224: 
2258 
226: 
227: 
228: 
229: 
230: 
231: 
232% 
233: 
234: 
2358 
236: 
237% 
238: 
239: 
240: 
241: 
242: 
243: 
244: 
245: 
246: 
2473 
248: 
249: 
250: 
251: 
252 
253% 
254: 
2553 
256: 
257: 
2583 
2593 
266: 
261: 
262: 
263: 
264: 
265: 
266: 
267: 
268: 


=e =e 


=e te 


, 
nomatch: 


Fhe 


ilhst: 


, 
match: 


=e 


ora a ;was it already? 
jz filhst ;£i11 host if not 


host buffer active, same as seek buffer? 
lda sekdsk 


lxi h,hstdsk same disk? 
cmp m ;sekdsk = hstdsk? 
jnz nomatch 


same disk, same track? 


lxi h,hsttrk 
call sektrkcmp s;sektrk = hsttrk? 
jnz nomatch 


same disk, same track, same buffer? 
lda sekhst 


lxi h,hstsec s:sekhst = hstsec? 
cmp m 

jz match :;skip if match 
;proper disk, but not correct sector 

lda hstwrt shost written? 
ora a 

cnz writehst s;clear host buff 


smay have to fill the host buffer 
lda sekdsk 
sta hstdsk 
lhlid sektrk 
shld hsttrk 


lda sekhst 

sta hstsec 

lda rsflag ;need to read? 
ora a 

cnz readhst syes, if l 

xra a 7;@ to accum 

sta hstwrt ;no pending write 


;copy data to or from buffer 


lda seksec smask buffer number 
ani secmsk sleast signif bits 
mov l,a ;ready to shift 
mvi h,@ s;double count 

rept 7 s;shift left 7 

dad h 

endm 

hl has relative host buffer address 

lxi d,hstbuf 

dad d s:hl = host address 
xchg :;now in DE 

lhld dmaadr :;get/put CP/M data 
mvi c,128 s;length of move 
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2693, | lda readop swhich way? 
270: ora a 


2713 jnz rwmove ;skip if read 

2723 3 

273% 3 write operation, mark and switch direction 

274: mvi Byd 

275s sta hstwrt shstwrt = 1 

276: xchg ;source/dest swap 

277: 3; 

278: rwmove: 

2793 7C initially 128, DE is source, HL is dest 

286: ldax d ;source character 

281: inx d 

282: Mov m,a sto dest 

283: inx h 

284: dcr e ;loop 128 times 

285: jnz rwmove 

286: ; 

287: 3; data has been moved to/from host buffer 

288: lda wrtype ;write type 

289: cpi wrdir ;to directory? 

298: lda erflag ;in case of errors 

2913 rnz ;no further processing 

292: ; 

293: 3; clear host buffer for directory write 

294: ora a ;errors? 

2953 rnz ;skip if so 

296: xra a 7@ to accum 

2973 sta hstwrt ;buffer written 

298: call writehst 

2993 lda erflag 

306: ret 

301: ; 

362: g RRR KHER KEE RK EER KEKE KKK EKER KEKE KE KEREKKKKEKKKKEKKKKKE 

303: ;* sd 

304: ;* Utility subroutine for 16-bit compare * 
. 0 ® * 

Ber. TIE IOIOISIOOCCICCICICICIGIGISI GIGI IOGIOO ICCC III Gk 

307: sektrkcmp: 

308: 7;HL = ,unatrk or .hsttrk, compare with sektrk 

369: xchg 

3186: Lxi h,sektrk 

311: ldax d ;low byte compare 

S124 cmp m ;same? 

313% rnz ;return if not 

314: ; low bytes equal, test high ls 

315¢ inx d 

316: inx h 

317: ldax d 

318: cmp m ;sets flags 

319: ret 

320: ; 


va 


321: 
322: 
323: 
324: 
325: 
326: 
327: 
328: 
329: 
330: 
331: 
332: 
333: 
334: 
335: 
336: 
337: 
338: 
339: 
340: 
341: 
342: 
343: 
344; 
345: 
346: 
347: 
348: 
349: 
356: 
351% 
35/2 
353: 
354: 
3.55: 
356: 
357: 
358: 
359: 
360: 
361: 
362: 
363: 
364: 
365: 
366: 
367: 
368: 
369: 
370: 


g ERK KEKE KEKE EKER ERK ERK KEKE KE KKK RE RK EKER KE RE REE KEREREKKEK 
ox * 
tad WRITEHST performs the physical write to * 
3 the host disk, READHST reads the physical sl 
-* disk, * 
3 * * 
g RR KKKKEKEKKEKE KK KKK KEKE KEE KEKE KER KEKE KEE KERR EKERKERERKEKKKEK 


writehst: 


s;hstdsk = host disk #, hsttrk = host track #, 
;hstsec = host sect #. write "hstsiz" bytes 
;from hstbuf and return error flag in erflag. 
s;return erflag non-zero if error 
ret 

readhst: 
shstdsk = host disk #, hsttrk = host track #, 
shstsec = host sect #. read “hstsiz" bytes 
s;into hstbuf and return error flag in erflag. 
ret 


KRREKKKEKEKEKKEKERKEKKEKEKEEKRKEKEKKEKRKRKERKKKEKKKEKKEKEKRKEREKEKKEKKEKKKKKKEKE 
* 

Unitialized RAM data areas Bs 

* 
KEKKEKRKKEKKKKEKKEKKEKKEKKEKKEKKKKKEKKEKKKEKKKE A KREKKKKKKKKKKKKE 


=e se se te we Se 
+ + % * 


sekdsk: ds nk :;seek disk number 
sektrk: ds 2 ;seek track number 
seksec: ds 1 s;seek sector number 


’ 

hstdsk: ds 
hsttrk: ds 
hstsec: ds 


shost disk number 
shost track number 
shost sector number 


HN 


sekhst: ds 1 sseek shr secshf 
hstact: ds ni shost active flag 
hstwrt: ds 1 shost written flag 
unacnt: ds 1 sunalloc rec cnt 
unadsk: ds 1 slast unalloc disk 
unatrk: ds 2 slast unalloc track 
unasec: ds 1 slast unalloc sector 


, 

erflag: ds 1 ;error reporting 
rsflag: ds uy ;read sector flag 
readop: ds 1 ;1 if read operation 
wrtype: ds 1 ;write operation type 
dmaadr: ds 2 slast dma address 
hstbuf: ds hstsiz shost buffer 


o 
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371: 
372: 
3738 
374: 
3752 
376: 


=e =e =e se =e 


* 
* 
* 
* 
* 


KRREKRKEKEKEEKKKEKKEKEKREKRKEEKRKEKKEKEKEKEKRKEKEEKRKKKKKKKKKKKKKKEKK 


The ENDEF macro invocation goes here 


* 
* 
* 


KRREKKEKRKEKKKEKKEKKEKKEKKKEKEKEKRKEKRKEKEKEKKERKEKKKKRKKKKKKKKKRKKKKEKE 


end 
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CP/M Dynamic Debugging Tool (DDI) 


User “s Guide 


I. Introduction. 


The DDI program allows dynamic interactive testing and debugging of 
programs generated in the CP/M environment. The debugger is initiated by 
typing one of the following commands at the CP/M Console Command level 


DDI 
DDI filename .HEX 
DDI filename.COM 


where "filename" is the name of the program to be loaded and tested. In both 
cases, the DDI program is brought into main memory in the place of the Console 
Command Processor (refer to the CP/M Interface Guide for standard memory 
organization), and thus resides directly below the Basic Disk Operating System 
portion of CP/M. The BDOS starting address, which is located in the address 
field of the JMP instruction at location 5H, is altered to reflect the reduced 
Transient Program Area size. 


The second and third forms of the DDI command shown above perform the same 
actions as the first, except there is a subsequent automatic load of the 
specified HEX or OOM file. The action is identical to the sequence of 
commands 


DDI 
Ifilename.HEX or Ifilename.COM 
R 


where the I and R commands set up and read the specified program to test (see 
the explanation of the I and R commands below for exact details). 


Upon initiation, DDT prints a sign-on message in the format 
nnK DDI-s VER mm 


where nn is the memory size (which must match the CP/M system being used), s 
is the hardware system which is assumed, corresponding to the codes 


Digital Research standard version 
MDS version 

IMSAI standard version 

Omron systems 

Digital Systems standard version 


NOHZY 


and mm is the revision nunber. 


Following the sign on message, DDI prompts the operator with the character 
“"-""and waits for input commands from the console. The operator can type any 
of several single character commands, terminated by a carriage return to 
execute the command. Each line of input can be line-edited using the standard 
CP/M controls 


rubout remove the last character typed 
ctl-U remove the entire line, ready for re-typing 
ct1-C system reboot 


Any cammand can be up to 32 characters in length (an automatic carriage return 
is inserted as the 33rd character), where the first character determines the 
command type 


enter assembly language mnemonics with operands 
display memory in hexadecimal and ASCII 

fill memory with constant data 

begin execution with optional breakpoints 

set up a standard input file control block 

list memory using assembler memonics 

move a memory segment from source to destination 
read program for subsequent testing 

substitute memory values 

trace program execution 

untraced program monitoring 

examine and optionally alter the CPU state 


XCHNDWEOHODOD 


The cammand character, in some cases, is followed by zero, one, two, or three 
hexadecimal values which are separated by commas or single blank characters. 
All DDI numeric output is in hexadecimal form. In all cases, the commands are 
not executed until the carriage return is typed at the end of the command. 


At any point in the debug run, the operator can stop execution of DDT 
using either a ctl-C or GO (jmp to location @@00H), and save the current 
memory image using a SAVE command of the form 


SAVE n filename.COM 


where n is the number of pages (256 byte blocks) to be saved on disk. The 
number of blocks can be determined by taking the high order byte of the top 
load address amd converting this number to decimal. For example, if the 
highest address in the Transient Program Area is 1234H then the number of 
pages is 12H, or 18 in decimal. Thus the operator could type a ctl-C during 
the debug run, returning to the Console Processor level, followed by 


SAVE 18 X.COM 
The memory image is saved as X.COM on the diskette, and can be directly 


executed by simply typing the name X. If further testing is required, the 
memory image can be recalled by typing 


DDI X.COM 


which reloads previously saved program from loaction 10@H through page 18 
(12FFH). The machine state is not a part of the COM file, and thus the 
program must be restarted from the beginning in order to properly test it. 


II. DDI COMMANDS. 


The individual commands are given below in some detail. In each case, the 
operator must wait for the prompt character (-) before entering the command. 
If control is passed to a program under test, and the program has not reached 
a breakpoint, control can be returned to DDI by executing a RST 7 from the 
front panel (note that the rubout key should be used instead if the program is 
executing a T or U command). In the explanation of each command, the command 
letter is shown in some cases with numbers separated by commas, where the 
numbers are represented by lower case letters. These numbers are always 
assumed to be in a hexadecimal radix, and from one to four digits in length 
(longer numbers will be automatically truncated on the right). 


Many of the commands operate upon a "CPU state" which corresponds to the 
program under test. The CPU state holds the registers of the program being 
debugged, and initially contains zeroes for all registers and flags except for 
the program counter (P) and stack pointer (S), which default to 100H. The 
program counter is subseguently set to the starting address given in the last 
record of a HEX file if a file of this form is loaded (see the I and R 
commands) . 


1. The A (Assemble) Command. DDI allows inline assembly language to be 
inserted into the current memory image using the A command which takes the 
form 

As 


where s is the hexadecimal starting address for the inline assembly. DDI 
prompts the console with the address of the next instruction to fill, and 
reads the console, looking for assembly language mnemonics (see the Intel 8980 
Assembly Language Reference Card for a list of mnemonics), followed by 
register references and operands in absolute hexadecimal form. Each sucessive 
load address is printed before reading the console. The A command terminates 
when the first empty line is input from the console. 


Upon canpletion of assembly language input, the operator can review the 
Memory segment using the DDI disassembler (see the L command). 


Note that the assembler/disassembler portion of DDI can be overlayed by 
the transient program being tested, in which case the DDI program responds 
with an error condition when the A and L commands are used (refer to Section 
IV). 


2. The D (Display) Command. The D command allows the operator to view 
the contents of memory in hexadecimal and ASCII formats. The forms are 


D 
Ds 


In the first case, memory is displayed from the current display address 
(initially 10@H), and continues for 16 display lines, Each display line takes 
the form shown below 


aaaa bb bb bb bb bb bb bb bb bb bb bb bb bb bb bb bb cccccccccccccccc 


where aaaa is the display address in hexadecimal, and bb represents data 
present in memory starting at aaaa. The ASCII characters starting at aaaa are 
given to the right (represented by the sequence of c’s), where non-graphic 
characters are printed as a period (.) symbol. Note that both upper and lower 
case alphabetics are displayed, and thus will appear as upper case symbols on 
a console device that supports only upper case. Each display line gives the 
values of 16 bytes of data, except that the first line displayed is truncated 
so that the next line begins at an address which is a multiple of 16. 


The second form of the D command shown above is similar to the first, 
except that the display address is first set to address s. The third form 
causes the display to continue from address s through address f. In all 
cases, the display address is set to the first address not displayed in this 
command, so that a continuing display can be accomplished by issuing 
successive D commands with no explicit addresses. 


Excessively long displays can be aborted by pushing the rubout key. 


3. The F (Fill) Command. The F command takes the form 
Fs,f,c 


where s is the starting address, f is the final address, and c is a 
hexadecimal byte constant. The effect is as follows: DDI stores the constant 
c at address s, increments the value of s and tests against f. If s exceeds f 
then the operation terminates, otherwise the operation is repeated. Thus, the 
fill cammand can be used to set a memory block to a specific constant value. 


4. The G (Go) Command. Program execution is started using the G comand, 
with up to two optional breakpoint addresses. The G command takes one ot the 
forms 

G 
Gs 
Gs,b 


Gs,b,c 
, 


G,b 
G,b,c 


The first form starts execution of the program under test at the current value 
of the program counter in the current machine state, with no breakpoints set 
(the only way to regain control in DDI is through a RST 7 execution). The 
current program counter can be viewed by typing an X or XP command. The 
second form is similar to the first except that the program counter in the 
current machine state is set to address s before execution begins. The third 
form is the same as the second, except that program execution stops when 
address b is encountered (b must be in the area of the program under test). 
The instruction at location b is not executed when the breakpoint is 
encountered. The fourth form is identical to the third, except that two 
breakpoints are specified, one at b and the other at c. Encountering either 
breakpoint causes execution to stop, and both breakpoints are subseguently 
cleared. The last two forms take the program counter from the current machine 
state, and set one and two breakpoints, respectively. 


Execution continues from the starting address in real-time to the next 
breakpoint. That is, there is no intervention between the starting address 
and the break address by DDT. Thus, if the program under test does not reach 
a breakpoint, control cannot return to DDI without executing a RST 7 
instruction. Upon encountering a breakpoint, DDT stops execution and types 


*d 


where d is the stop address. The machine state can be examined at this point 
using the X (Examine) command. The operator must specify breakpoints which 
differ from the program counter address at the beginning of the G command. 
Thus, if the current program counter is 1234H, then the commands 


G,1234 
and 
G400,408 


both produce an immediate breakpoint, without executing any instructions 
whatsoever. 


5. The I (Input) Command. The I command allows the operator to insert a 
file name into the default file control block at 5CH (the file control block 
created by CP/M for transient programs is placed at this location; see the 
CP/M Interface Guide). The default FCB can be used by the program under test 
as if it had been passed by the CP/M Console Processor. Note that this file 
name is also used by DDT for reading additional HEX and COM files. The form 
of the I command is 


Ifilename 
or 


Ifilename.filetype 


If the second form is used, and the filetype is either HEX or COM, then 
subseguent R commands can be used to read the pure binary or hex format 
Machine code (see the R command for further details). 


6. The L (List) Command. The L command is used to list assembly language 
mnemonics in a particular program region. The forms are 


L 
Ls 
Ls,f 


The first canmand lists twelve lines of disassembled machine code from the 
current list address. The second form sets the list address to s, and then 
lists twelve lines of code. The last form lists disassembled code from s 
through address f. In all three cases, the list address is set to the next 
unlisted location in preparation for a subsequent L_ command, Upon 
encountering an execution breakpoint, the list address is set to the current 
value of the program counter (see the G and T commands). Again, long typeouts 
can be aborted using the rubout key during the list process, 


7. The M (Move) Command. The M command allows block movement of program 
or data areas from one location to another in memory. The form is 


Ms,f£,d 


where s is the start address of the move, f is the final address of the move, 
and d is the destination address. Data is first moved from s to d, and both 
addresses are incremented. If s exceeds f then the move operation stops, 
otherwise the move operation is repeated. = 8 


8. The R (Read) Command. The R command is used in conjunction with the I 
command to read COM and HEX files from the diskette into the transient program 
area in preparation for the debug run. The forms are 


R 
Rb 


where b is an optional bias address which is added to each program or data 
address as it is loaded. The load operation must not overwrite any of the 
system parameters from @@0H through @FFH (i.e., the first page of memory). If 
b is amitted, then b=@@908 is assumed. The R command requires a previous I 
command, specifying the name of a HEX or COM file. The load address for each 
record is obtained from each individual HEX record, while an assumed load 
address of 10@H is taken for COM files. Note that any number of R commands 
can be issued following the I command to re-read the program under test, 


assuming the tested program does not destroy the default area at 5SCH. 
Further, any file specified with the filetype “COM” is assumed to contain 
machine code in pure binary form (created with the LOAD or SAVE command), and 
all others are assumed to contain machine code in Intel hex format (produced, 
for example, with the ASM command). 


Recall that the command 
DDI filename.filetype 
which initiates the DDI program is equivalent to the commands 


DDI 
-Ifilename.filetype 
-R 


Whenever the R command is issued, DDI responds with either the error indicator 
"2" (file cannot be opened, or a checksum error occurred in a HEX file), or 
with a load message taking the form 


NEXT PC 
nnnn pppp 


where nnnn is the next address following the loaded program, and pppp is the 
assumed program counter (19@H for COM files, or taken from the last record if 
a HEX file is specified). 


9. The S (Set) Command. The S command allows memory locations to be 
examined and optionally altered. The form of the command is 


Ss 


where s is the hexadecimal starting address for examination and alteration of 
memory. DDI responds with a numeric prompt, giving the memory location, along 
with the data currently held in the memory location. If the operator types a 
carriage return, then the data is not altered. If a byte value is typed, then 
the value is stored at the prompted address. In either case, DDT continues to 
pranpt with successive addresses and values until either a period (.) is typed 
by the operator, or an invalid input value is detected. 


19. The T (Trace) Command. The T command allows selective tracing of 
program execution for 1 to 65535 program steps. The forms are 


T 
Tn 


In the first case, the CPU state is displayed, and the next program step is 
executed. The program terminates immediately, with the termination address 


displayed as 
*hhhh 


where hhhh is the next address to execute. The display address (used in the D 
command) is set to the value of H and L, and the list address (used in the L 
command) is set to hhhh. The CPU state at program termination can then be 
examined using the X command. 


The second form of the T command is similar to the first, except that 
execution is traced for n steps (n is a hexadecimal value) before a program 
breakpoint is occurs. A breakpoint can be forced in the trace mode by typing 
a rubout character. The CPU state is displayed before each program step is 
taken in trace mode. The format of the display is the same as described in 
the X command. 


Note that program tracing is discontinued at the interface to CP/M, and 
resumes after return from CP/M to the program under test. Thus, CP/M 
functions which access I/O devices, such as the diskette drive, run in 
real-time, avoiding I/O timing problems. Programs running in trace mode 
execute approximately 500 times slower than real time since DDI gets control 
after each user instruction is executed. Interrupt processing routines can be 
traced, but it must be noted that commands which use the breakpoint facility 
(G, T, and U) accomplish the break using a RST 7 instruction, which means that 
the tested program cannot use this interrupt location. Further, the trace 
mode always runs the tested program with interrupts enabled, which may cause 
problems if asynchronous interrupts are received during tracing. 


Note also that the operator should use the rubout key to get control back 
to DDI during trace, rather than executing a RST 7, in order to ensure that 
the trace for the current instruction is completed before interruption. 


11. The U (Untrace) Command. The U command is identical to the T command 
except that intermediate program steps are not displayed. The wntrace mode 
allows from 1 to 65535 (@FFFFH) steps to be executed in monitored mode, and is 
used principally to retain control of an executing program while it reaches 
steady state conditions. All conditions of the T command apply to the U 
command. 


12. The X (Examine) Command. The X command allows selective display and 
alteration of the current CPU state for the program under test. The forms are 


X 
Xr 


- where r is one of the 8888 CPU registers 


C Carry Flag (8/1) 
Z Zero Flag (0/1) 


Minus Flag (8/1) 
Even Parity Flag (8/1) 
Interdigit Carry (@/1) 
Accumulator (Q-FF) 
BC register pair (@-FFFF) 
DE register pair (@-FFFF) 
HL register pair (Q-FFFF) 
Stack Pointer (O-FFFF) 
Program Counter (@-FFFF) 


VNMOWDPHMS 


In the first case, the CPU register state is displayed in the format 
C£ZEMfEfI£ A=bb B=dddd D=dddd H=dddd S=dddd P=dddd inst 


where f is a @ or 1 flag value, bb is a byte value, and dddd is a double byte 
quantity corresponding to the register pair. The "inst" field contains the 
disassembled instruction which occurs at the location addressed by the CPU 
state’s program counter. 


The second form allows display and optional alteration of register values, 
where r is one of the registers given above (C, Z, M, E, I, A, B, D, H, S, or 
P). In each case, the flag or register value is first displayed at the 
console, The DDI program then accepts input from the console. If a carriage 
return is typed, then the flag or register value is not altered. If a value 
in the proper range is typed, then the flag or register value is altered. 
Note that BC, DE, and HL are displayed as register pairs. Thus, the operator 
types the entire register pair when B, C, or the BC pair is altered. 


III. IMPLEMENTATION NOTES. 


The organization of DDI allows certain non-essential portions to be 
overlayed in order to gain a larger transient program area for debugging large 
programs. The DDI program consists of two parts: the DDI nucleus and the 
assembler/disassembler module. The DDI nucleus is loaded over the Console 
Command Processor, and, although loaded with the DDI nucleus,’ the 
assembler/disassembler is overlayable unless used to assemble or disassemble. 


In particular, the BDOS address at location 6H (address field of the JMP 
instruction at location 5H) is modified by DDT to address the base location of 
the DDI nucleus which, in turn, contains a JMP instruction to the BDOS. Thus, 
programs which use this address field to size memory see the logical end of 
memory at the base of the DDI nucleus rather than the base of the BDOS. 


The assembler/disassembler module resides directly below the DDI nucleus 
in the transient program area. If the A, L, T, or X commands are used during 
the debugging process then the DDI program again alters the address field at 
6H to include this module, thus further reducing the logical end of memory. 
If a program loads beyond the beginning of the assembler/disassembler module, 
the A and L commands are lost (their use produces a "?" in response), and the 


trace and display (T and X) commands list the "inst" field of the display in 
hexadecimal, rather than as a decoded instruction. 


Tv. AN EXAMPLE. 


The following example shows an edit, assemble, and debug for a simple 
program which reads a set of data values and determines the largest value in 
the set. The largest value is taken from the vector, and stored into "LARGE" 
at the termination of the program 


ED SCAN.ASH 
a se 


* J fee root echo 
P ta org tr” tog = _LALTSTART_OF TRANSIENT AREA, 
VI B»LEH  iLENGTH OF VECTOR 10 SCAN, 
VI C.8 vLARGER-RST VALUE SO FAR, 
LOOP_-P_0_-0_-L LX! Hp VECT iBASE OF VECTOR, 
Loop.’ Moy 


MoV AM iGET VALUE, 

ae ca sLARGER VALUE IN-¢?, 

qin NC NFOUND iJUMP IF LARGER VALUE NOT FOUND 

dys? NEW LARGEST VALUE, STORE IT TO C, . 
¥ 


bulb d fA, 
NFOUND: INK H iT0 NEXT ELEMENT 
DCR 8 ;HORE TO SCAN?” Create Source 
| JNZ Loop  JFOR ANOTHER, Pregvom. - underlined 
4 
ri END OF SCAN, STORE Cy Charackrs typed 
HOY a,c GET LARGEST VALUE el 
TA ARGE , 2 ky Program “ 
MP ;REBOOT, "" vemesedts Carriage 
4a 
3a TEST DATA return. 
VECT: DB 2 BA. Bs 5: Fi lis 
Ce EQU F-VECT LENGTH, 
CARGE: DS 7 ;LARGEST VALUE ON EXIT 
4 any 
+B OP 
ORG 108H i START OF TRANSIENT AREA 
MvI B,LEH LENGTH OF YECTOR TO SCAN 
HYI c.8 ;LARGEST YALUE SO FAR 
LXI H,VECT sBASE OF VECTOR 
LOOP: Mov alm ;GET VALUE 
SUB c ;LARGER VALUE IN C? 
UNC NFOUND iJUMP IF LARGER VALUE NOT FOUND 
; NEW LARGEST YALUE, STORE IT TO C 
HOY CLA 
NFOUND: INK H TO NEXT ELEMENT 
BCR B sMORE TO SCAN? 
UNZ LOOP FOR ANOTHER 


10 


€: j END OF SCAN, STORE C 


MOY A-C iGET LARGEST VALUE 
STA LARGE 
JAP 8 iREBOOT 
i TEST DATA 
VECT: DB 2-6,4,3,5,6,1,5 
LEN E@QU $-VECT iLENGTH 
LARGE: OBS 1 sLARGEST VALUE ON EXIT 
END 


PER SEND Start Asceudoler 


CP/M ASSEMBLER - VER 1.0 


8122 
@G2H USE FACTOR 


END OF ASSEMBLY Acsemldy Complete - Lock at Prom Lshng 


TYPE SCAN.PRN 


? 
Code hdawes 7 Source Fegram 
0160 Mochme (ode ORG 1@9H i START OF TRANSIENT AREA 
© 0188 8668 MYT B, LEN iLENGTH OF VECTOR TO SCAN 

8162 BEBE MYI C,.@ j LARGEST VALUE SO FAR 

0184 211981 LKI H» ¥YECT BASE OF VECTOR 

@1807 7E LOOP. MOY A.M ;GET VALUE 

0168 91 SUB c ; LARGER VALUE IN C? 

0169 D2eDe1 JNC NFOUND iJUMP IF LARGER VALUE NOT FOUND 
F NEW LARGEST VALUE, STORE IT Toc 

@18C 4F MOY Cc: A 

@16D 23 NFOUND: INX H i TO NEXT ELEMENT 

@18E @5 DCR B iMORE TO SCAN? 

@19F C20781 JNZ Loop iFOR ANOTHER 
j END OF SCAN, STORE C 

@112 79 Moy AE iGET LARGEST YALUE 

6113 322181 STA LARGE 

8116 crag ; JMP Q i REBOOT 

Code / ichny j 
“truncated ; TEST DATA 

8119 @260040305YECT: DB 2s Oy &. Fn 8% Ge ie 8 

69608 = ¢ LEN Eau $-YECT iLENGTH 

121 Value of) LARGE: DS 1 js LARGEST VALUE ON EXIT 

@122  Equote’ END 

a> 


ouy Gobo. ves . Stort Debuyer lsu hex fomat machine Code 


16K DBT YER 1.6 


NEXT PC 

8121, 6668 : * 

ete iat lind eldest sect vehuchin 
; ¢  4o eeude at 


COZGMBEGIG A=@0 B=G008 D=8000 H=@008 S=010@ P=@G08 OUT 7F PCeO 


ay Gramue vegistors loefoe debug run. 


peewee 288) Cluange PC-+0 (00 

“Ey lok at vests again or changed: 
COZ@MGEGI@ A=6@ B=8006 D=8008 H=@G08 S=0100 P=01G0 MY¥I B88" ) 
~L18@ ; 
——? Nac tudtvucton 
106 MV¥I B.88 +y decute at Pe=wo 


8192 M¥I C,8@ 
6164 LXI H.@119 
8197 MOY ALM 


8198 SUB C 
8199 JNC 616D Discecembled Machine 
B10C MOY CLA 

g1@D INX H Code at te 
BigE BCR B Kee 7 
G10F NZ 0187 io Combar is 0 

B112 MOY A.C 

=L 

=) 


Bil3S STA Gi2i 
Bilé6é JMP 8008 
8119 STAX B 


G11A NOP 

@11B INR B M Itte move 

@11C INK B machine Code. 

@11D DCR B 

B11E M¥I B.A (ste ~Hnal Program 
8120 DCR & ends at location 16 


@121 LXI UD. 2206 wrt, a au? tp 0000) . 

aite, ever inline. assembly tote 40 elange the INP + C0 Into a RST 7, whid 
. will Cause the Proavam under est to vetam 4p ODT iF WH 

—e Ss eviey executed. 

8117) (4ingle Carriage Yetuln st09s ascemUe mote) 


“L113, Ld Cade at 8K fo check Hal R517 wns Prepay inserted 


? 
8113 STA 6121 ¢~ IM place § IMP 


@ité RST 67 


8116 RST 7 


8117 NOP 


6118 NOP 
@i19 STAX B 
Bila NOP 


@11B INR B 
BiiC INK B 


-X. — Loak al veaistys 
CO@Z@MBEGIG A=00 B=G008 D=BG06 H=G000 $=@10@ P=8180 MYI B,. 48 


“Ty Brecuke Proavam-tr one skp. util CPL Stak.» before 2 is erecuked 


COZGMBEC1G A=G0 B=8088 D=800G H=GH00 S=G1808 P=@10G M¥I B,&8*8102 


4) “Trae one KP asain Coote O8U in B) Guowahi. vedepovnt J 


COZGMBEGIG A=86 B=G86G D=8006 H=GG68 S=G10@ P=81G2 MVI C,66*0164 


-T. : . ; 
—? Trace again (Resiser C « cleared) 
COZOMGEGIG A=06 B=8806 D=8006 H=@000 S=G@1%G P=@104 LXI H.8119%*8107 


13> Trace Hwee skes 


COZGMBEGIG A=86 B=4880 D=800G H=G119 S=@10@ P=0107 MOY ALM 
C6OZ@MBEGIG A=82 B=88H0 D=8008 H=G119 S=@10@ P=@188 SUB C 
COZ@MBE@I1 A=62 B=@888 D=8600 H=@119 S=@1@@ P=@109 JNC 610D*010D 


es Diloy memory darting at IIH, ind, Gidomate beak 0 — 


Pragram aa 


8160 86 6@ OG 86 GB BG 04 BG BA OH 42H 04 4G GH 6 BA yy. Asctt: ntl ae’ 


0180 04 @@ BG GB GB BG OG BO G8 BH BO 4G BO GB 26 Be wate Pojrhion of | | 
8190 BG GG G6 BB 88 BO BO 2G BB 2B BO 4 29 28 BH Be duo 
@1AG 8G BG BO OB OG BO BO BG BB BB BG 2G 2G BA OB 2A Choracters 

8180 BG BG BO @B BB BH B@ BH OB BB BE 4G OG BA Ba 2a 

B1CB BB BG OB BB OB BB BO BB OB AB Be BO 2G BB 2B AB 


“A Current CPU state 


COZGMBEGI1 A=02 B=@800 D=8G06 H=@119 S=G1GG P=@1G@D INK H 


-T5 

—y Trace $ sees fiom Current CPL Stade, 

COZ@MBE@I11 A=02 B=9806 D=8008 H=@119 $=@10@ P=91@D INK H 

COZ@MBE@I1 A=82 B=8800 D=8008 H=G11h S$=@106 P=@18E DCR B Adomote 
COZ@MBE@I1 A=82 B=0700 D=8008 H=@11A S=@10G P=O16F UNZ 0107 Bregkpout 
COZ@MBEGI11 A=02 B=0700 D=8000 H=G11A S=@10@ P=8107 MOY ALM 
COZ@MBEGI1 A=60 B=0700 D=8008 H=@11A $=010@ P=@108 SUB C#a189 


“27 Trace without listing (nkermediak. stades 


COZIMBELI1 A=@6 B=G706 D=@000 H=@11h S=01@0 P=@109 JUNC O18D*0108 


“2, Ceu State at cud h Us y 


COZG@MBE111 A=04 B=8608 D=8000 H=G11B S=@100 P=@1a8 SUB C 


“SD Pun P04 Yom Som Cuvext PC whl ComPletion Cin real-time) 
*eit6 reakeout ot UGH) caused by executing RST 7 in ynaclune Gde 
2) Cpudate at ad d Ping an 


COZIMBE1I1 A=66 B=8608 D=8006 H=G121 S=G190 P=@116 RST 47 


“P> cvamue avd change Drcgvown Counter 


P=@116 168 
—v? 


“& 
~ 
COZIMBELIL A=G@6 B=@006 D=860% H=@121 S=a14a6 Panes MV¥I 


ABZ Woce 10 CWeradecinnal ) cleps rest age clone wot a 
C@ZIMBE1I1 A=@@ B=G006 D=8 § rae 106 on 
COZIMBE1I1 A=88 9100 P=01G2 MYI 
COZIMBE1I1 A=@e@ @10@ P=0164 LXI 
C@ZIMBEL1I1 A=86 § 9@1@@ P=6167 MOY 
COZIMBELT1 A@d) a60 @10@ P=@188 SUB 
COZ@MBEGI1 A=02 B=0800 D=8000 H=@119 S=910 P=@109 JN 
COZ@MBEG@I1 A=G2 B=088G D=800@ H=8119 S=@100 P=@1aD IN 
COZ@MBEQI1 A=02 B=080G D=8008 H=@11A S=@100 P=81BE BCR 
COZ@MBEGI1 A=62 B=0700 D=8006 H=@11A S=@18@ P=@1BF JNZ 
COZOMBEGI1 A=@2 B=0786 D=B00@ H=G11A S=@100 P=@107 MOV 
COZGMBEQI1 A=G@ B=0780 D=8000 H=@11A S=@100 P=B108 SUB 
COZIMBEL1I1 A=@0 B=0766 D=800@ H=@11A S=6100 P=@109 JNC 
COZIMBE1I1 A=G@ B=878@ D=000@ H=@11A S=@100 P=818D INX 
C@ZIMBEI1I1 A=@0 B=0700 D=800@ H=@118 S=@100 P=@10E DCR 
COZOMBE1I1 A=@G B=G600 D=8008 H=@11B S=9100 P=@10F JNZ 
C@ZOMBE1I1 A=@@ B=8600 D=8@08 H=011B S=@100 P=0107 MOV 
-A189 


A,M*B188 


——s ITvcert a bat porte eho 4°) ang rave waved the 
#199 JC 16D He wacline Code 

——) 40 chang -t, value vom Kudo C since ADC. 
8180) Tit fo Te : Sime this Cade was not executeh, 
“oe, Sor DT <o-tut a version of It @ppeare that -the THC should 


“the Perched Program can be Saved have been a TC iwstructon 


SAVE 1 SCAN. CON, Planam yesdes on tirst Pose, <0 Save 1 Page « 


@>EDT SCAN. CON, — Recburt DOT with “the Saved meme mee bo coxhnie -lechiy 


ié6k DDT VER 1.6 
NEXT PC 
62060 6168 


“Liga, List some Code 


#19@ M¥I 8.08 

9102 M¥I C.a6 6, beh d 

$104 %LXI H.@119 ee c Pe im X.COM 
ie MOY ALM ious Patoh is Prese 

8198 SUB C 

9189 JC 616 


1 4. 


B19C MOY CLA 
@19D INK H 
@19E DCR 6 
818F JNZ 6167 

B112 MOY A.C 

* 

P=6166) 

pre lace to See low Pictched veysun 
COZGMBEOI6 D=@608 H=400a 
COZOMBEGIG D=8696 
COZGMBEOIG D 

COZGMBEGIG D 

COZOMBEGIG D 

COZGMBEGI1 D 

COZOMBEGI1 D 

COZOMBEOI1 D=6808 H=6119 
COZGMBE@I1 D=8606 H=6118 
COZ@MBE@I1 D=8666 H=6118 
COZOMBEQI 1 D=8G60 H=8118 
COZOMGEQI 1 D=8609 H=611A 
CIZOM1E@16 D=8008 H=811A 
CiZOM1E@1@ D=6606 H=@11A 
CiZ@M1E@1@ A=FE B=6782 D=8000 H=@118 
C1IZ@MBE1I1 A=FE B=@602 D=8000 H=6118 
4) 

CIZ@MBE1I1 A=FE 8=@662 D=8000 H=0118 


S=8168 
S=@196 
S=@166 


S=@166 


Date is moked from A-b C 


“G-108 Runtiom Curvest PC and breakpoint at 08H 


CIZ@MBE111 A=84 B=8682 D=8008 H=G118 $=6106 
-T : 

“? Siugle Step for & Feus cycles 
CiZ@MGELI1 A=04 B=@602 D=8800 H=0116 S=e106 
a 

-v 
COZ@MBEGI1 A=02 B=0602 D=HG00 H=G116 S=6108 
-x 
“y 
COZGMBEGI1 A=62 B=G682 D=8606 H=0118 S=0100 
“G,  Runto Gamplehon 
*O116 
-¥ 
—3 
COZ1MBE111 A=@3 B=8083 D=8000 H=@121 S=e186 


“SHEA, ook ack the value of "Laece” 


B121 83, Wrong Value! 


is” 


6168 M¥I 8.48 
4162 MY¥I 5.68 
@164 LXI H,@119 
81607 MOY ALM 
@1@8 SUB c 
8169 JC 81@6D 
@16C MOY C.A 
P=816D IN® ral 
P=@168E DCR 3] 
P=@16F JNZ 8167 
P=@167 MOY a | 
P=@168 SUB ¢ 
P=@1639 JC 8160 
P=@16D INX H 
P=@16BE DCR 8B 
P=@18F JNZ 6167*86187 
lveakroutt aller \b skps— 
P=8167 MOY 5a | 
P=a@1@8 SUB c 
P=8163 SUB C*6169 
P=8@189 JC B1G@D*@1ec 
P=@1a@C MOY c.A 
P=@116 RST 67 


B122 86, 


B1i23 22) 


v 
Bi26 82, End Ae S Command 


ai2?7 7E , 


@112 MOY A.C eurew the Code 


Bil? NOP 

6118 NOP 

@il9 STAX B 
BitA NOP 

@ilB INR B 
@iiC INK 8B 
BiiD DCR 8B 
BLi1E M¥I B.@1 
6126 DCR B 
~KP 


P=0116 160, eset Nhe fe 
“1, Swale Stee, and watch data Values 


COZIMBEL111 A=@3 B=0003 D=8069 H=G121 S=81@@ P=@106 MY¥I 8B. 83*9182 


~~ 
COZIMBELT1 A=G3 B=4803 D=8G00 H=G121 S=8146 P=8142 M¥I C.66*0184 
ad 9 Court set 

e f * largest "set 
C@ZiIMBE1L111 A=G3 B=4866 D=@086 H=G121 S=@10@ P=8144 LXI H,.@119%6167 
~T 
“Jy sg luce addvess & dota set 


COZIMBE1LT1 A=63 B=G306 D=8G66 H=@119 S=G1@@ P=@1G7 MOY A. M*O198 


76 


cfust dle don brought +0 A 


A=62 B=8306 D=8@46H H=G119 S=G140 P=@148 
A=4@2 B=H506 D=6600 H=G@119 S=@14H0 P=4149 
A=02 B=@80@ D=8@G96 H=G@119 $=G@19G@ P=8146C 
fat decto chem vnqved toc covvectly 
A=02 B=O802 D=@000 H=0119 S$=@10G P=H10D 
A=62 B=4862 D=6860 H=G11h S=G18G P=R@1HE 
A=@2 B=8782 D=R@BGH H=G11A S=G10H P=818F 
R=82 B=8782 D=eG84 H=Gii9 S=B81iae P=e1a7 


Second. dete chem lovouglet +p A 


A=@@ B=8@702 D=@G06 H=G11h S=G18@ P=G148 


MOY 


INK 


BCR 


JNZ 


Mov 


Sue 


e Subtrad dectvoys diode Value wlicl Was loaded I 


A=FE B=8762 D=e@0@6 H=G11A S=G@18G@ P=@1469 


Jc 


A=FE B=8762 D=80068 H=G@11A S=8146 P=816R INX 


B.@8 
C.4@ 
H»@119 


C#a1ag 


B1GD*G616C 


C.A*810D 


H*@1BE 


BaGQibr 


B1G7*B147 


A. M*elee 


C*@1eg 


B1aD*ea18D 


H#@1BE 


Ce —— This chau Laue been a CMP so-tuct veqeskr A 


B10D would ust oe destroyed - 


H 

B 
6187 
AsC 


bat Patch at (08H clanyes sus to CMP 


=) 
COZIMBE1T1 
a 1) 
COZGMHEGI 1 
-T 
me | 
COZQMBEGI1 
-T 
“2 
COZQMBE@11 
7 
v 
COZGMBEGI1i 
-T 
Vv 
COZ@MBE@I1 
-T 
“2 
C&ZQMBEGII 
-T 
—} 
COZQMBEQI1 
-T 
ag 
CiZOM1E@Ie@ 
-T 
“~ 
CiZ@M1iE@IG 
-Li@@ 
=e 
@10@ MY¥I 
8182 MY¥I 
@104 LXI 
8197 MOV 
@19&% SUB 
8199 JC 
8ie8c MOY 
@190 INK 
@1iGE DCR 
@19F JNZ 
Hitz may 
-A1@s 
ies CHF 
———" 

8199, 


“88, shop WT for SNE 


SAVE 1 SCAN. COM , 
TP Swe memory nce 


A>DDT Senn Ee Cat dt DOT 
16k DOT VER 1.@ 


NEXT PC 
206 0108 
“a 
P=0108) 
“Lit6, 
116 RST 67 
H117 NOP 
e1ig Nop + Lack at cede tosee oF it wis Properly Loaded 
@11A NOP (long +typeout Aloarted tt, Yuloouct) 
~ Cruloout) 
“Bi16. Run from \ootto completion 
*O116 
“3 Look at Carry t etongle typo) 
Ci 
2 


“4y look at Cru state 


CIZIMBELI1 A=06 B=@006 D=@000 H=G@121 S=@10G P=@116 RST 47 
~$i2i t . 
aa 0 
2 look at Lage - (t appears tp be Correct. 
121i 86) 


@122 86) 


8123 22 9) 


it <p DDT 


ED SCANe ast Re-edit dW Source Pravam, avd make both changes 


“Olt, ? sit 

SU Cc sjLARGER VALUE IN CF 
¥S5U M LT, 

cM Cc jLARGER VALUE IN C? 
* 
Pd 


NC NFQUND GJUMNP IF LARGER VALUE NOT FOUND 
¥* SNC Lf, 


NFOUND iJUMP IF LARGER VALUE NOT FOUND 


1? 


asm SCAN AaZ ” Qe_accowldle, selecting SOuNce Srom duck A 


CPYM ASSEMBLER - VER 1.0 Wx to disk A uf ) 
Pout to Z (Selects vo Print Ty 

Hize 

O2H USE FACTOR 

END OF ASSEMBLY 


not scan HEX, Qe-yun delunger to Check Changes 


16k BOT VER 1.6 
NEXT PC 
Hiz1 @@66 


-Li16 
oem J 


arie ump aaaa Check oy evsuve ends dill at IILU 


@ii19 STAX B 


@itA NOP 
@1LE INR B 
~ (vuloout) 


“G188, 116 Gy from lea inning wrth loveakpont at end 
eaire — lweakPout veacled 


“D121, Look at "Laese" __-rouyect value Comructed 
ay oe eee 7E ER 77 13 23 EB @B 78 BL. t.W, 


8136 Ce 27 61 C3 83 29 GG G6 4G OH OG 44 G4 BA 4G a9 ok aD em wae BB Grk @ 
14@ 06 @@ 46 66 G@ B66 O@ GH BH GH BH 4H 2G BH BH HB ......... 2... 


- (vuleout) alors lows topequt 
“= she DoT, debua seesion Complete 


oy 


4. 


5. 


6. 
7e 
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CP/M Assembler User’s Guide 


1. INTRODUCTION. 


The CP/M assembler reads assembly language source files from the diskette, 
and produces 8988 machine language in Intel hex format. The CP/M assembler is 


initiated by typing 


ASM filename 
or 
ASM filename.parms 


In both cases, the assembler assumes there is a file on the diskette with the 
name 
filename .ASM 


which contains an 8988 assembly language source file. The first and second 
forms shown above differ only in that the second form allows parameters to be 
passed to the assembler to control source file access and hex and print file 
destinations. 


In either case, the CP/M assembler loads, and prints the message 
CP/M ASSEMBLER VER n.n 


where n.n is the current version mumber. In the case of the first command, 
the assembler reads the source file with assumed file type “ASM” and creates 
two output files 


filename .HEX 
and 
filename .PRN 


the “HEX” file contains the machine code corresponding to the original program 
in Intel hex format, and the “PRN” file contains an annotated listing showing 
generated machine code, error flags, and source lines. If errors occur during 
translation, they will be listed in the PRN file as well as at the console 


The second cammand form can be used to redirect input and output files 
from their defaults. In this case, the “parms” portion of the command is a 
three letter group which specifies the origin of the source file, the 
destination of the hex file, and the destination of the print file. ‘The form 
is 

filename .plp2p3 
where pl, p2, and p3 are single letters 


pl: A,B, «ee, Y designates the disk name which contains 


the source file 
p2: A,B, eee, Y designates the disk name which will re- 
ceive the hex file 
Z skips the generation of the hex file 
p3: A,B, «se, Y designates the disk name which will re- 
ceive the print file 
X places the listing at the console 
Z skips generation of the print file 


Thus, the command 
ASM X.AAA 


indicates that the source file (X.ASM) is to be taken from disk A, and that 
the hex (X.HEX) and print (X.PRN) files are to be created also on disk A. 
This form of the command is implied if the assembler is run from disk A. That 
is, given that the operator is currently addressing disk A, the above command 
is equivalent to 


ASM X 
The command 

ASM X.ABX 
indicates that the source file is to be taken from disk A, the hex file is 
Placed on disk B, and the listing file is to be sent to the console. The 
command 

ASM X.B2ZZ 
takes the source file from disk B, and skips the generation of the hex and 
print files (this command is useful for fast execution of the assembler to 
check program syntax). 

The source program format is compatible with both the Intel 8980 assembler 
(macros are not currently implemented in the CP/M assembler, however), as well 
as the Processor Technology Software Package #1 assembler. That is, the CP/M 
assembler accepts source programs written in either format. - There are certain 
extensions in the CP/M assembler which make it somewhat easier to use. ‘These 
extensions are described below. 

2. PROGRAM FORMAT. 


An assembly language program acceptable as input to the assembler consists 
of a sequence of statements of the form 


line# label operation operand  ;comment 


where any or all of the fields may be present in a particular instance. Each 


-embly language statement is terminated with a carriage return and line feed 
(the line feed is inserted automatically by the ED program), or with the 
character “!" which is a treated as an end-of-line by the assembler (thus, 
multiple assembly language statements can be written on the same physical line 
if separated by exclaim symbols). 


The line# is an optional decimal integer value representing the source 
program line number, which is allowed on any source line to maintain 
compatibility with the Processor Technology format. In general, these line 
numbers will be inserted if a line-oriented editor is used to construct the 
original program, and thus ASM ignores this field if present. 


The label field takes the form 


identifier 
Or 
identifier: 


and is optional, except where noted in particular statement types. The 
identifier is a sequence of alphanumeric characters (alphabetics and numbers) , 
where the first character is alphabetic. Identifiers can be freely used by 
the programmer to label elements such as program steps and assembler 
directives, but cannot exceed 16 characters in length. All characters are 
Significant in an identifier, except for the embedded dollar symbol ($) which 
can be used to improve readability of the name. Further, all lower case 
alphabetics become are treated as if they were upper case. Note that the ":" 
following the identifier in a label is optional (to maintain compatibility 
between Intel and Processor Technology). Thus, the following are all valid 
instances of labels 


x xy long$name 
Xx: yxl: longer $named$data: 
xly2 X1x2 X234$5678$9012$3456: 


The operation field contains either an assembler directive, or pseudo 
operation, or an 8988 machine operation code. The pseudo operations and 
machine operation codes are described below. 


The operand field of the statement, in general, contains an expression 
formed out of constants and labels, along with arithmetic and logical 
Operations on these elements. Again, the complete details of properly formed 
expressions are given below. 


The comment field contains arbitrary characters following the ";" symbol 
until the next real or logical end-of-line. These characters are read, 
listed, and otherwise ignored by the assembler. In order to maintain 
compatability with the Processor Technology assembler, the CP/M assembler also 
treat statements which begin with a "*" in column one as comment statements, 
which are listed and ignored in the assembly process, Note that the Processor 


Technology assembler has the side effect in its operation of ignoring the 
characters after the operand field has been scanned. This causes an ambiguous 
situation when attempting to be compatible with Intel’s language, since 
arbitrary expressions are allowed in this case. Hence, programs which use 
this side effect to introduce comments, must be edited to place a ";" before 
these fields in order to assemble correctly. 


The assembly language program is formulated as a sequence of statements of 
the above form, terminated optionally by an END statement. All statements 
following the END are ignored by the assembler. 


3. FORMING THE OPERAND. 


In order to completely describe the operation codes and pseudo operations, 
tt is necessary to first present the form of the operand field, since it is 
used in nearly all statements. Expressions in the operand field consist of 
simple operands (labels, constants, and reserved words), combined in properly 
formed subexpressions by arithmetic and logical operators. The expression 
computation is carried out by the assembler as the assembly proceeds. [Each 
expression must produce a 16-bit value during the assembly. Further, the 
number of significant digits in the result must not exceed the intended use. 
That is, if an expression is to be used in a byte move immediate instruction, 
then the most significant 8 bits of the expression must be zero, The 
restrictions on the expression significance is given with the individual 
instructions, 


3.1. Labels. 


As discussed above, a label is an identifier which occurs on a particular 
statement. In general, the label is given a value determined by the type of 
statement which it precedes. If the label occurs on a statement which 
generates machine code or reserves memory space (e.g, a MOV instruction, or a 
DS pseudo operation), then the label is given the value of the program address 
which it labels. If the label precedes an EQU or SET, then the label is given 
the value which results from evaluating the operand field. Except for the SET 
statement, an identifier can label only one statement. 


When a label appears in the operand field, its value is substituted by the 
assembler. This value can then be combined with other operands and operators 
to form the operand field for a particular instruction. 


3.2. Numeric Constants. 

A numeric constant is a 16-bit value in one of several bases. ‘The base, 
called the radix of the constant, is denoted by a trailing radix indicator. 
The radix indicators are 


B binary constant (base 2) 
O octal constant (base 8) 


’ 


Q octal constant (base 8) 
D decimal constant (base 19) 
H hexadecimal constant (base 16) 


Q is an alternate radix indicator for octal numbers since the letter O is 
easily confused with the digit @. Any numeric constant which does not 
terminate with a radix indicator is assumed to be a decimal constant. 


A constant is thus composed as a sequence of digits, followed by an 
optional radix indicator, where the digits are in the appropriate range for 
the radix. That is binary constants must be composed of @ and 1 digits, octal 
constants can contain digits in the range @ - 7, while decimal constants 
contain decimal digits. Hexadecimal constants contain decimal digits as well 
as hexadecimal digits A (10D), B (11D), C (12D), D (13D), E (14D), and F 
(15D). Note that the leading digit of a hexadecimal constant must be a 
decimal digit in order to avoid confusing a hexadecimal constant with an 
identifier (a leading @ will always suffice). A constant composed in this 
manner must evaluate to a binary number which can be contained within a 16-bit 
counter, otherwise it is truncated on the right by the assembler. Similar to 
identifiers, imbedded "S$" are allowed within constants to improve their 
readability. Finally, the radix indicator is translated to upper case if a 
lower case letter is encountered. The following are all valid instances of 
numeric constants 


1234 1234D 110@B 1111$8000$1111$0000B 
1234H OFFEH 33770 33$77$220 
33770 =: @fe3h 12344 @ffffh 


3.3. Reserved Words. 


There are several reserved character sequences which have predefined 
meanings in the operand field of a statement. The names of 8880 registers are 
given below, which, when encountered, produce the value shown to the right 


A 7 
B Y) 
Cc 1 
D 2 
E 3 
H 4 
L 5 
M 6 
SP 6 
PSW 6 


(again, lower case names have the same values as their upper case 
eguivalents). Machine instructions can also be used in the operand field, and 
evaluate to their internal codes. In the case of instructions which require 
operands, where the specific operand becomes a part of the binary bit pattern 


oF +he instruction (e.g, MOV A,B), the value of the instruction (in this case 
MOV) is the bit pattern of the instruction with zeroes in the optional fields 
(e.g, MOV produces 4@H). 

When the symbol "S$" occurs in the operand field (not imbedded within 
identifiers and numeric constants) its value becomes the address of the next 
instruction to generate, not including the instruction contained withing the 
current logical line. 


3.4. String Constants. 


String constants represent sequences of ASCII characters, am are 
represented by enclosing the characters within apostrophe symbols (°). All 
strings must be fully contained within the current physical line (thus 
allowing "!" symbols within strings), and must not exceed 64 characters in 
length. The apostrophe character itself can be included within a string by 
representing it as a double apostrophe (the two keystrokes ~°), which becomes 
a single apostrophe when read by the assembler. In most cases, the string 
length is restricted to either one or two characters (the DB pseudo operation 
is an exception), in which case the string becomes an 8 or 16 bit value, 
respectively. Two character strings become a 16-bit constant, with the second 
character as the low order byte, and the first character as the high order 
byte. 


The value of a character is its corresponding ASCII code. fThere is no 
case translation within strings, and thus both upper and lower case characters 
can be represented. Note however, that only graphic (printing) ASCII 
characters are allowed within strings. Valid strings are 


t— @ ca 


A 
“Walla Walla Wash.” 

“She said ~“Hello”” to me.” 
“I said “Hello” to her.” 


3.5. Arithmetic and Logical Operators, 


The operands described above can be combined in normal algebraic notation 
using any cambination of properly formed operands, operators, and 
parenthesized expressions. The operators recognized in the operand field are 


a+b unsigned arithmetic sum of a and b 

a-b unsigned arithmetic difference between a and b 
+b unary plus (produces b) 

b unary minus (identical to @ - b) 

b unsigned magnitude multiplication of a and b 

b unsigned magnitude division of a by b 

MOD b_~ remainder after a / b 

NOT b logical inverse of b (all @°s become 1’s, 1’s 

become @°s), where b is considered a 16-bit value 


a AND b_bit-by-bit logical and of a and b 

a ORb bit-by-bit logical or of a and b 

a XORb_ bit-by-bit logicl exclusive or of a and b 

a SHL b~ the value which results from shifting a to the 
left by an amount b, with zero fill 

a SHR b_ the value which results from shifting a to the 
right by an amount b, with zero fill 


In each case, a and b represent simple operands (labels, numeric 
constants, reserved words, and one or two character strings), or fully 
enclosed parenthesized subexpressions such as 


10+20 10h+370 Ll /3 (L2+4) SHR 3 
(“‘a° and 5fh) + “O° (“B°+B) OR (PSW+M) 
(1+(2+c)) shr (A-(B+1) ) 


Note that all canputations are performed at assembly time as 16-bit unsigned 
operations. Thus, -l is camnputed as @-1 which results in the value @ffffh 
(iee., all 1’s). The resulting expression must fit the operation code in 
which it is used. If, for example, the expression is used in a ADI (add 
immediate) instruction, then the high order eight bits of the expression must 
be zero. As a result, the operation “ADI -l" produces an error message (-l 
becomes O@ffffh which cannot be represented as an 8 bit value), while “ADI (-1) 
AND @FFH" is accepted by the assembler since the “AND” operation zeroes the 
high order bits of the expression. 


3.6. Precedence of Operators. 


As a convenience to the programmer, ASM assumes that operators have a 
relative precedence of application which allows the programmer to write 
expressions without nested levels of parentheses. The resulting expression 
has assumed parentheses which are defined by the relative precedence. ‘The 
order of application of operators in unmparenthesize expressions is listed 
below. Operators listed first have highest precedence (they are applied first 
in an wunparenthesized expression), while operators listed last have lowest 
precedence. Operators listed on the same line have equal precedence, and are 
applied from left to right as they are encountered in an expression 


* / MOD SHL SHR 
-+ 


Thus, the expressions shown to the left below are interpreted by the assembler 
as the fully parenthesize expressions shown to the right below 


a*bte fa * b) +c 
atb*e a + (b * oc) 
a MOD b * c SHL dG ((a MOD b) * c) SHLd 


a OR b AND NOI c + d SHLe a OR (b AND (NOT (c + (d SHL e)))) 
Balanced parenthesized subexpressions can always be used to override the 
assumed parentheses, and thus the last expression above could be rewritten to 
force application of operators in a different order as 

(a OR b) AND (NOT c) +d SHLe 
resulting in the assumed parentheses 
(a OR b) AND ((NOT c) + (d SHL e)) 


Note that an wunparenthesized expression is well-formed only if the expression 
which results from inserting the assumed parentheses is well-formed. 


4. ASSEMBLER DIRECTIVES. 


Assembler directives are used to set labels to specific values during the 
assmbly, perform conditional assembly, define storage areas, and specify 
starting addresses in the program. Each assembler directive is denoted by a 
“pseudo operation” which appears in the operation field of the line, The 
acceptable pseudo operations are 


ORG set the program or data origin 

END end program, optional start address 
EQU numeric “equate” 

SET numeric "set" 

IF begin conditional assembly 

ENDIF end of conditional assembly 

DB define data bytes 

DW define data words 

DS define data storage area 


The individual pseudo operations are detailed below 
4.1. The ORG directive. 
The ORG statement takes the form 
label ORG expression 


where “label” is an optional program label, and expression is a 16-bit 
expression, consisting of operands which are defined previous to the ORG 
statement. The assembler begins machine code generation at the location 
specified in the expression. There can be any number of ORG statements within 
a particular program, and there are no checks to ensure that the programmer is 
not defining overlapping memory areas, Note that most programs written for 
the CP/M system begin with an ORG statement of the form 


ORG 100H 


which causes machine code generation to begin at the base of the CP/M 
transient program area. If a label is specified in the ORG statement, then 
the label is given the value of the expression (this label can then be used in 
the operand field of other statements to represent this expression). 


4.2. The END directive. 


The END statement is optional in an assembly language program, but if it 
is present it must be the last statement (all subseguent statements are 
ignored in the assembly). The two forms of the END directive are 


label END 
label END expression 


where the label is again optional. If the first form is used, the assembly 
process stops, and the default starting address of the program is taken as 
G000. Otherwise, the expression is evaluated, and becomes the program 
starting address (this starting address is included in the last record of the 
Intel formatted machine code "hex" file which results from the assembly). 
Thus, most CP/M assembly language programs end with the statement 


END 100H 


resulting in the default starting address of 19@H (beginning of the transient 
program area). 


4.3. The EQU directive. 


The EQU (equate) statement is used to set up synonyms for particular 
numeric values. the form is 


label EQU- expression 


where the label must be present, and must not label any other statement. The 
assembler evaluates the expression, and assigns this value to the identifier 
given in the label field. The identifier is usually a name which describes 
the value in a more human-oriented manner. Further, this name is used 
throughout the program to “parameterize” certain functions. Suppose for 
example, that data received from a Teletype appears on a particular input 
port, and data is sent to the Teletype through the next output port in 
seguence. The series of equate statements could be used to define these ports 
for a particular hardware environment 


TTYBASE EQU- 10H ;BASE PORT NUMBER FOR TITY 
TTYIN EQU TTYBASE ;TTY DATA IN 
TTYOUT EQU TTYBASE+1;TTY DATA OUT 


At a later point in the program, the statements which access the Teletype 
could appear as 


IN TTYIN ;READ TTY DATA TO REG-A 


OUr TTYOUT ;WRITE DATA TO TIY FROM REG-A 


making the program more readable than if the absolute i/o ports had been 
used, Further, if the hardware environment is redefined to start the Teletype 
communications ports at 7FH instead of 10H, the first statement need only be 
changed to 


TTYBASE EQU- 7FH ;BASE PORT NUMBER FOR TITY 


and the program can be reassembled without changing any other statements. 


4.4, The SET Directive. 
The SET statement is similar to the EQU, taking the form 
label SET expression 


except that the label can occur on other SET statéments. within the. program. 
The expression is evaluated and becomes the current value associated. with the 
label. Thus, the EQU statement defines a label with a single value, while the 
SET statement defines a value which is valid from the current SET statement to 
the point where the ‘label occurs on the next SET statement. The use of the 
SET is similar to the EQU statement, but is used most often in ‘controlling 
conditional assembly. 


4.5. The IF and ENDIF directives. 


The IF and ENDIF statements define a range of assembly language statements 
which are to be included or excluded during the assembly process. The form‘is 


IF expression ! 
statement#1 

statement#2 

statement#n 

ENDIF 


Upon encountering the IF statement, the assembler evaluates the expression 
following the IF (all operands in the expression must be defined ahead of the 
IF statement). If the expression evaluates to a non-zero value, ‘then 
statement#1 through statement#n are assembled; if the expression evaluates to 
zero, then the statements are listed but not assembled. Conditional assembly 
is often used to write a single “generic” program which includes a number of 
possible run-time environments, with only a few specific portions of the 
program selected for any particular assembly. The following program: segments 
for example, might be part of a program which communicates with either a 
Teletype or a CRI console (but not both) by selecting a particular value for 
TTY before the assembly begins 
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TRUE EQU) =OFFFFH DEFINE VALUE OF TRUE 
FALSE EQU NOI TRUE~- ;DEFINE VALUE OF FALSE 


TTY EQU) TRUE ;TRUE IF TTY, FALSE IF CRT 
TIYBASE EQU) 16H ;BASE OF TTY I/O PORTS 
CRIBASE EQU) 20H ;BASE OF CRI I/O PORTS 

IF TTY ;ASSEMBLE RELATIVE TO TTYBASE 


;CONSOLE INPUT 
CONOUT EQU fTTYBASE+1 ;CONSOLE OUTPUT 


IF NOT TTY ;ASSEMBLE RELATIVE TO CRIBASE 
CONIN EQU- CRIBASE CONSOLE INPUT 
CONOUT EQU  CRIBASE+1 ;CONSOLE OUTPUT 


IN CONIN ;READ CONSOLE DATA 
OUT CONOUT ;WRITE CONSOLE DATA 


In this case, the program would assemble for an environment where a Teletype 
is connected, based at port 10H. The statement defining TTY could be changed 
to 


TTY EQU FALSE 
and, in this case, the program would assemble for a CRI based at port 20H. 
4.6. The DB Directive. 


The DB directive allows the programmer to define initialize storage areas 
in single precision (byte) format. The statement form is 


label DB e#l, e#2, ..., e#n 


where e#1 through e#n are either expressions which evaluate to 8-bit values 
(the high order eight bits must be zero), or are ASCII strings of length no 
greater than 64 characters. There is no practical restriction on the number 
of expressions included on a single source line. The expressions are 
evaluated and placed sequentially into the machine code file following. the 
last program address generated by the assembler. String characters are 
similarly placed into memory starting with the first character and ending with 
the last character. Strings of length greater than two characters cannot be 
used aS operands in more complicated expressions (i.e., they must stand alone 
between the commas). Note that ASCII characters are always placed in memory 
with the parity bit reset (@). Further, recall that there is no translation 
from lower to upper case within strings. The optional label can be used to 
reference the data area throughout the remainder of the program. Examples of 


valid DB statements are 


data: DB «6,1,2,3,4,5 
DB data and @ffh,5,3770,1+2+3+4 
signon: DB please type your name”,cr,1f, 
DB ‘AB’ SHR 8, <, “DE” AND 7FH 


4.7. The DW Directive. 


The DW statement is similar to the DB statement except double precision 
(two byte) words of storage are initialized. The form is 


label DW) e#l, e#2, we, e#nN 


where e#1 through e#n are expressions which evaluate to 16-bit results. Note 
that ASCII strings of length one or two characters are allowed, but strings 
longer than two characters disallowed. In all cases, the data storage is 
consistent with the 8988 processor: the least significant byte of the 
expression is stored forst in memory, followed by the most significant byte. 
Examples are 


doub: DW  $6ffefh, doub+4 ,Signon-$, 255+255 
DW ‘a’, 5, ‘ab’, “CD”, 6 shl 8 or 1lb 


4.8. The DS Directive. 


The DS statement is used to reserve an area of uninitialized memory, and 
takes the form 


label DS_~ expression 


where the label is optional. The assembler begins subsequent code generation 
after the area reserved by the DS. Thus, the DS statement given above has 
exactly the same effect as the statement 


label: EQU $ sLABEL VALUE IS CURRENT CODE LOCATION 
ORG $+expression ;MOVE PAST RESERVED AREA 


5. OPERATION CODES. 


Assembly language operation codes form the principal part of assembly 
language programs, and form the operation field of the instruction. In 
general, ASM accepts all the standard mnemonics for the Intel 8080 
microcomputer, which are given in detail in the Intel manual "8980 Assembly 
Language Programming Manual." Labels are optional on each input line and, if 
included, take the value of the instruction address immediately before the 
instruction is issued. The individual operators are listed breifly in the 
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following sections for completeness, although it is understood that the Intel 
manuals should be referenced for exact operator details. In each case, 


e3 represents a 3-bit value in the range #7 
which can be one of the predefined registers 
A, B, C, D, E, H, L, M, SP, or PSW. 


e8 represents an 8-bit value in the range @-255 
e16 represents a 16-bit value in the range @-65535 


which can themselves be formed from an arbitrary combination of operands and 
operators. In some cases, the operands are restricted to particular values 
within the allowable range, such as the PUSH instruction. These cases will be 
noted as they are encountered. 


In the sections which follow, each operation codes is listed in its most 
general form, along with a specific example, with a short explanation and 
special restrictions. 


5.1. Jumps, Calls, and Returns. 
The Jump, Call, and Return instructions allow several different forms 


which test the condition flags set in the 8088 microcomputer CPU. The forms 
are 


JMP e16 JMP Ll Jump unconditionally to label 
JNZ el16 JMP L2 Jump on non zero condition to label 
JZ el6 JMP 100H Jump on zero condition to label 
JNC el6 JNC L1+4 Jump no carry to label 

JC el6 JC L3 Jump on carry to label 

JPO el6 JPO $+8 Jump on parity odd to label 

JPE el6 JPE L4 Jump on even parity to label 

JP el6 JP GAMMA Jump on positive result to label 
JM el16 JM al Jump on minus to label 

CALL e16 CALL Sl Call subroutine unconditionally 
CNZ el6 CNZ S2 Call subroutine if non zero flag 


CZ «el6 CZ 100H Call subroutine on zero flag 
CNC el6 CNC S1+4 Call subroutine if no carry set 


cc el6 cc. §3 Call subroutine if carry set 
CPO el6 CPO $+8 Call subroutine if parity odd 
CPE el6 CPE S4 Call subroutine if parity even 


CP el6 CP GAMMA Call subroutine if positive result 
CM el6 CM bl$c2 Call subroutine if minus flag 


RST e3 RST @ Programmed “restart”, equivalent. to 
CALL 8*e3, except one byte call 
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Return from subroutine 
Return if non zero flag set 
Return if zero flag set 
Return if no carry 

Return if carry flag set 
Return if parity is odd 
Return if parity is even 
Return if positive result 
Return if minus flag is set 


5.2. Immediate Operand Instructions, 


Several instructions are available which load single or double precision 
registers, or single precision memory cells, with constant values, along with 
instructions which perform immediate arithmetic or logical operations on the 
accumulator (register A). 


MVI e3,e8 


ADI e8 
ACI e8 
SUI e8 
SBI e8 
ANI e8 
XRI e8 
ORI e8 
CPI e8 


LXI e3,e16 


MVI B,255 


ADI 1 

ACI @FFH 

SUI L+ 3 

SBI L AND 11B 
ANI $ -AND 7FH 
XRI 1111S@80B 
ORI L AND 1+1 
CPI ‘a’ 


LXI B,100H 


Move immediate data to register A, B, 
C, D, E, H, L, or M (memory) 

Add immediate operand to A without carry 
Add immediate operand to A with carry 
Subtract from A without borrow (carry) 
Subtract from A with borrow (carry) 
Logical “and" A with immediate data 
“Exclusive or" A with immediate data 
Logical “or” A with immediate data 
Compare A with immediate data (same 
as SUI except register A not changed) 


Load extended immediate to register pair 
(e3 must be eguivalent to B,D,H, or SP) 


5.3.- Increment and Decrement Instructions. 


Instructions are provided 


in the 8080 repetoire for incrementing or 


decrementing single and double precision registers. The instructions are 


INR e3 
DCR e3 
INX e3 


DCX e3 


INR E 
DCRA 
INX SP 


DCX B 


Single precision increment register (e3 
produces one of A, B, C, D, E, H, L, M) 
Single precision decrement register (e@3 
produces one of A, B, C, D, E, H, L, M) 
Double precision increment register pair 
(e3 must be equivalent to B,D,H, or SP) 
Double precision decrement register pair 
(e3 must be equivalent to B,D,H, or SP) 


5.4. Data Movement Instructions. 
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Instructions which move data from memory to the CPU and from CPU to 


memory are given below 


MOV e3,e3 MOV A,B 
LDAX e3 LDAX B 
STAX e3 STAX D 
LHLD e16 LHLD Ll 
SHLD el6 SHLD L5+x 
LDA el6 LDA Gamma 
STA el6 STA X3-5 
POP e3 POP PSW 
PUSH e3 PUSH B 
IN e8 IN 1) 
OUr e8 OUT 255 
XTHL 

PCHL 


© = 


Move data to leftmost element from right- 
most element (e3 produces one of A,B,C 
D,E,H,L, or M). MOV M,M is disallowed 
Load register A from computed address 
(e3 must produce either B or D) 

Store register A to computed address 
(e3 must produce either B or D) 

Load HL direct from location el6 (double 
precision load to H and L) 

Store HL direct to location el6 (double 
precision store from H and L to memory) 
Load register A from address el6 

Store register A into memory at el6 
Load register pair from stack, set SP 
(e3 must produce one of B, D, H, or PSW) 
Store register pair into stack, set SP 
(e3 must produce one of B, D, H, or PSW) 
Load register A with data from port e8 
Send data from register A to port e8 
Exchange data from top of stack with HL 
Fill program counter with data from HL 
Fill stack pointer with data from HL 
Exchange DE pair with HL pair 


5.5. Arithmetic Logic Unit Operations. 


Instructions which act upon the single precision accumulator to perform 


arithmetic and logic operations are 


ADD e3 ADD B 
ADC e3 ADC L 
SUB e3 SUB H 
SBB e3 SBB 2 
ANA e3 ANA 1+1 
XRA e3 XRA A 
ORA e3 ORA B 
CMP e3 CMP 4H 
DAA 

CMA 

STC 


Add register given by e3 to accumulator 
without carry (e3 must produce one of A, 
B, C, D, E, H, or L) 

Add register to A with carry, e3 as above 
Subtract reg e3 from A without carry, 

e3 is defined as above 

Subtract register e3 from A with carry, 
e3 defined as above 

Logical "and" reg with A, e3 as above 
“Exclusive or“ with A, e3 as above 
Logical “or” with A, e3 defined as above 
Compare register with A, e3 as above 
Decimal adjust register A based upon last 
arithmetic logic unit operation 
Complement the bits in register A 

Set the carry flag to l 


iy 


CMC Complement the carry flag 


RLC Rotate bits left, (re)set carry as a side 
effect (high order A bit becomes carry) 

RRC Rotate bits right, (re)set carry as side 
effect (low order A bit becomes carry) 

RAL Rotate carry/A register to left (carry is 
involved in the rotate) 

RAR Rotate carry/A register to right (carry 


is involved in the rotate) 
DAD e3 DAD B Double precision add register pair e3 to 
HL (e3 must produce B, D, H, or SP) 
5.6. Control Instructions. 


The four remaining instructions are categorized as control instructions, 
and are listed below 


HLT Halt the 8889 processor 

DI Disable the interrupt system 
EI Enable the interrupt system 
NOP No operation 


6. ERROR MESSAGES. 


When errors occur within the assembly language program, they are listed as 
Single character flags in the leftmost position of the source listing. The 
line in error is also echoed at the console so that the source listing. need 
not be examined to determine if errors are present. The error codes are 


D Data error: element in data statement cannot be 
placed in the specified data area 


E Expression error: expression is ill-formed and 
cannot be computed at assembly time 


L Label error: label cannot appear in this context 
(may be duplicate label) 


N Not implemented: features which will appear in 
future ASM versions (e€.g., macros) are recognized, 
but flagged in this version) 


O Overflow: expression is too complicated (i.e., too 
many pending operators) to computed, simplify it 


P Phase error: label does not have the same value on 
two subsequent passes through the program 
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R Register error: the value specified as a register 
is not compatible with the operation code 


V Value error: operand encountered in expression is 
improperly formed 


Several error message are printed which are due to terminal error 
conditions 


NO SOURCE FILE PRESENT The file specified in the ASM command does 
not exist on disk 


NO DIRECTORY SPACE The disk directory is full, erase files 
which are not needed, and retry 


SOURCE FILE NAME ERROR Improperly formed ASM file name (e.g., it 
is specified with "?" fields) 


SOURCE FILE READ ERROR Source file cannot be read properly by the 
assembler, execute a TYPE to determine the 
point of error 


€) OUTPUT FILE WRITE ERROR. Output files cannot be written properly, most 
likely cause is a full disk, erase and retry 


CANNOT CLOSE FILE Output file cannot be closed, check to see 
if disk is write protected 
7. A SAMPLE SESSION. 


The following session shows interaction with the assembler and debugger in 
the development of a simple assembly language program. 


ASM SORT, assewble SoeT.ftsm 


CP/M ASSEMBLER - VER 1.8 


Bi5C vrext Free addvess . 
@O3H USE FACTOR oh of table used 00 To FF (lexadecwusl ) 


END OF ASSEMBLY 


DIR SORT. *, 
SORT ASM souxe file of 
SORT BAK loackup vom last ede 
SORT PRN ‘print oars Ceapaains “i Characters) 
SORT HEX wachwe code 
A>TYPE SORT. PRN 
Source (me 
woeluvt Coble: locatean? SORT PROGRAM IN CP/M ASSEMBLY LANGUAGE 
: i START AT THE BEGINNING OF THE TRANSIENT PROGRAM AR 
6189 ; ORG 10GH 
wochug Cole 
G10@ 2146012 SORT: LX] H, SU ;ADDRESS SWITCH TOGGLE 
6103 3601 My I Mf ;SET TO 1 FOR FIRST ITERATION 
8105 214761 LKI H, I SADDRESS INDEX 
8108 3600 Mv I MH, @ il = @ 
; COMPARE I WITH. ARRAY SIZE 
@18A 7E COMP: MOY ALM jf REGISTER = 1 
@18B FEG9 CPI N-1 sCY SET IF I< (N-1) 
@16D D21981 JNC CONT ;CONTINUE IF I <= (N-2) 
; END OF ONE PASS THROUGH DATA 
@110 214681 LKI H, SW ;CHECK FOR ZERO SWITCHES 
6113 7EB7C26601 MOV ALM! GRA A! JNZ2 SORT END GF SORT IF SWs@ 
0118 FF RST ? ;G0 TO THE DEBUGGER INSTEAD OF REP 
; unceldl ouTi HUE THIS Pass 
i ABDRESSING I, SO LGAD AVCI>D INTO REGISTERS 
6119 SFiI6662148CONT: MOV E.A! MYI D,@! LHI Hs AV! DAD D! DAD D 
@121 4£792346 MOY CoM! MOV ALC! INX H! MOV BoM 


LOW GRDER BYTE IN A AHD C. HIGH ORDER BYTE IW B 


- 


MOY H AND L TQ ADBRESS AVYCI+1) 


~- 


125 23 INX H 
j 
i COMPARE VALUE WITH REGS CONTAINING AVC TD 
8126 965778239E SUB M! MOV D.A! MOV A,B! INK H! SBB A i SUBTRACT 
i BORROW SET IF AVCI+1>) > AVKT)D 
@12B DA3ZFG1 JC INCI sSKIP IF IN PROPER ORDER 
i CHECK FOR E®UAL VALUES 9 


O@12E B2CA3FQ! ORA D! yZ INCI] GSKIP IF AVCIT) = AYCT4ID 18 


@132 S67@2B5E MOV D.M! MOY M.B! DCX H! MOV E.M 


@136 712B722673 MOY M,C! DCK H! MOV M.D! DCX H! MOV MLE 
; INCREMENT SWITCH COUNT 
@13B 21460134 LXI HSU! INR MM 
i INCREMENT I 
@13F 21478134C3INCI:  LKI He I! INR M! UMP COMP 
; DATA DEFINITION SECTION 
0146 0@ SU: DB @ ;RESERVE SPACE FOR SWITCH COUNT 
6147 t, DS 1 ;SPACE FOR INDEX 
6148 @SBG640B1EAY: Dw 5, 180,36, 5G, 20, 7, 180, 390,100, -32767 
GQGA = EGU ($-AV)72 ;COMPUTE N INSTEAD OF PRE 
eisc “—e ude value. END 
ADTYPE SORT: HEX, 


: 1001000621 4601360121 470136007EFEG9D2196146 ; 
: 1001166021 46617EB7C200G1F FSF 1600214801 1988 — 

: 10012000194E79234623965778239E DASFBIBZCAA7 fea " 
: 190136003F0156702B5E712B7228732146013421C7 | HEX Tawat 

: 07014606470134C3GAG1 B06E 

: 1001488605006 4001E0032001 4000700E8832001BB 

: 0401580064006 18GBE 

: 0866000008 

A>DDT SORT. HEX» Start ddyua rune 


16K DDT VER 1.6 


nase wane defuutt address (vo addvees on Eud shctemest) 

- xP» 

P=6808 160, Change PC +0 (06 
a, 

-UFF FF urtvace for 65535 Steps glo 


COZOMBEQ1O A=80 B=G006 D=8G00 H=@a00 S=G1@0 P=0140 LXI H,@146"0180 
“T1@) voce (0, steps 


C6OZG6MBEGIO A=81 B=6000 D=8008 H=@146 S=@10@ P=@16@ LXI H.,6146 
COZ6MBE@1G A=61 B=@006 D=8006 H=G146 S=@16G P=@13 MVI M,61 
COZGMBEG16 A=61 B=8066 D=8000 H=G146 S=G@106 P=@145 LXI H,@147 
COZGOMBEGIG A=61 B=6066 D=8008 H=G147 S=@100 P=@143 MV¥VI M,6@ 
COZ6MBEGIG A=01 B=8606 D=8008 H=G147 S=G@10@ P=O01G@nH MOY ALM 
COZGMNBEGIG A=06 B=GG00 D=8000 H=0147 S=G@166 P=91HB CPI @9 
CIZOMIE@IG A=66 B=80088 D=8008 H=0147 S=@160 P=@1GD JNC 6119 
CiZ@M1EGIO A=66 B=660@ D=6606 H=@147 S=@106 P=@116 LXI H.@146 
CIZOMIEGIO A=00 B=8006 D=8606 H=G146 S=@10G P=6113 MOY A.M 
CiIZOMIEGIG A=61 B=G068 D=6666 H=6146 S=G@10G P=@114 DRA A 
COZOMBEGIO A=61 B=0000 D=8G06 H=6146 S=@16@ P=8115 JNZ 6166 
COZGMBEGIO A=81 B=0000 D=8606 H=0146 S=@100 P=810@ LXI H,6146 
COZGMBEGIG A=81 B=0000 D=8606 H=0146 S=@100 P=0103 MVI M61 
C6OZ@MBEGIG A=81 B=8000 D=8G00 H=0146 S=@14@ P=0105 LXI H,@147 
COZOMBEG1S A=61 B=8080 D=G606 H=G147 S=G@10@ P=0148 MYI M.&@ 
C@ZOMBEGIG A=01 B=8000 D=8606 H=G147 S=G10G P=916A MOV AL M*B15B 
-~ALGD 


JC hi clangeto a jung on | eee 19 


19BH 


-KP 
P 


P0108 160, veset Provaua County back beainning cf Program. 


“116, trace exeertun fev (Ou skps 


COZGMBEGIG A=66 B=66606 D=8600 H=G6147 S=G160 P=01608 LX] 
COZOMBEGIG A=G66 B=GG66 D=8006 H=G146 S=0100 P=@103 NVI 
COZOMBEGIG A=68 B=0006 D=B8606 H=G146 S=@10@ P=0105 LXI 
COZQ@MBEGIG A=06 B=6006 D=G406@ H=G147 S=@10G P=0148 MVI 
COZG@MBEGIG A=60 B=6G06 D=6666 H=G147 S=G10G P=616A MOV 
COZGMBEGIG A=66 B=G068 D=6G00 H=G147 S=@106 P=@16B CPI 
CIZ@M1E@1@ A=06 B=G6000 D=8686 H=@147 S=G106 P=G1GD JC 
CIZGMiEGI@ A=G6 B=4006 N=8G00 H=@147? S=@1GG P=G119 MOV 
CIZEMIEG@16 A=46 B=GG06 D=8G00G H=G147 S=G1GG P=@11A MVI 0D, 66 
CIZO@M1E@1G A=06 B=4600 D=G606 H=G147 GS=G19G P=@11C LXI H.@148 
CIZG@MIEGIG A=G0 B=@060 D=6068 H=G148 S=G1G@ P=G11F DAD B 
‘POZOMIEGIG A=68 B=G068 D=8000 H=G148 S=91606 P=@12@ DAD D 
@Z@M1E@I@ A=G@ B=G00@ D=@@08 H=G148 S=e@ie@e P=etei HOY CLA 
COZOMIE@I@ A=6G B=G60S5 D=G00G H=8148 S=81eG Peele2 MOV AOC 
COZOM1E@1@ A=@5 B=G@005 D=8008 H=G148 S=@10@ P=@123 INK H 
COZGM1EGIG A=65 B=G005 D=8006 H=0149 S$=918G P=@124 MOV B,M¥*8125 


-L166 

2 
8100 LXI H.6146 Aucomatic 
0103 MV¥I M.O1 wut 
165 LXI H.0147 brenepe 


9108 MY¥I M,0e 
810A MOV ALM lot some code 
9108 CPI 09 Com (OOK 


816b JC ‘6119 
8116 LXI H,- 6146 
81135 MOV ALM 
6it4 ORA A 

6115 JN2 61486 


a) 


B116 RST 07 ligt move 
8119 MOV E.A 


B1lA MVYI DB 
B11C LXI 4H.6148 


- Abort (ist with rubact 
-G, 118) start Progam from 
*@127 stopped with an external \uctevvupt v4 frm rent pave (pronyaue ee 
“T42 look at looping PYosyam wn tyece mode 1 loopms | wctely 


COZ@MBEGIO A=38 B=8064 D=8006 H=O156 S=816@ P=0127 MOV D.A 
COZGMBEG1@ A=38 B=G064 D=3806 H=G156 S=O010G P=0128 MOV ALB 
COZOMBEGIO A=00 B=0064 D=3806 H=@156 S$=G14@ P=@129 INK H 
COZGMBEGI1O A=80 B=0664 D=3866 H=G157 S=G@1GG@ P=@12h SEB M*O12B 


-b148 ae 
we deca (Ss sorted, but Pvosram doesut step ‘ 
6146 65 68 67 6B 14 O86 1E 66 


9156 32 86 64 G0 64 BG 2C G1 EB 63 B1 8G OG OB 6 68 2.0.D........... 
8160 BG GO BG 88 20 BO BA BH Gd bi BO GO OO OB AH BB..............-. 29 


curves PC Cr2st) aud Yuu in veal +ime to 1 (8H 


-Gp, return +> CP/M 


T T. HE ? reload the memory ! ace 


NEXT PC 
B15C BGe6 
-KP 


P=8008 180) set PC +o besinnung ck ronan 
“L16D, lat bad opcode 


@19D JNC 9119” 
6116 LXI H,0146 


~ abort lt wits rubout 
“A1BDD assewlle new opcode 


@18b JC 1139 
a 


8118, 
“L160, list start sechon of Promvam. 


6166 LXI 4H.6146 
6103 MMVI M.61 
6165 LXI H.,.6147 
8198 MV¥I 4M. a 


- aboot (ist woth cubeut oo . 
“A1B3» Clawge “aukels tuctralizatum 4o OG 
8183 MMVI HM. @) 


B145) 
-"¢ veturn 4o CP/M waives ot|-¢ (Ge wks as well) 


SAVE 1 SORT.COM, save 1 pose (256 lastes, from LOOK Ww 1FFH) on disk wh case 


. we heave to veload later 
A>DDT SORT. COM, yestart DDT web 


Saved memory wm ane 
16K DUT VER 1.6 . 
NEXT PC 
6200 8100 "Com" file always starts wrth address (00H 
“Gy rua the Prayaum fram PC=Id0H 


*8118 programed sp (ast 7) Cvcountered 
+~B1i48 lobe 
properly <arted 
8G a ; 


6148 65 66 67 G6 i4 B88 IE 


8156 32 6@ 64 @@ 64 BG 2C @1 EB O23 B1 BO OG BB 26 BA z2.D.D........... 
8166 8G 86 0 OB 28 BG BO BG OA GB BG uO BG BB BO oe................ 
0178 84 8 O64 we GB BG OG BB GB 4G Bo Ge Ow BB OB ee................ 


- GB, return to e7/M 


ED SURT.. B58 moke Chanees 4o on ginal pragvaw 


cH-2 ; ; 
en OC QeTT, tid wet Sd" 
MYI M.@ il = @ 
"Pug one le cn tent 
His I, sADDRESS INDEX 
*-) up another (me 
MMVI M.1 iSET TO 1 FOR FIRST ITERATION 
*KT, Kall eur wet line 
H. I jADDRESS INDEX 
*I) weert bn = 
HYVI M,.@ iZERO SW 
*D 
LXI H. I sADDRESS INDEX 
enunce Jor, 
JNC#T) 
CONT sCONTINUE IF I <= (N-2) 
*-2D1 LT 
JC CONT sCONTINUE IF I <= (N-2) 
*E wre From dish 
J = bert dist A 


ASM SORT. naz se om file 


CP/M ASSEMBLER - VER 1.6 


aise wack addves to assewble 
@03H USE FACTOR 
END OF ASSEMBLY 


ODT SORT. HEX, est Projram changes 


16K DOT VER i.@ 
NEXT PC 

B1i5C B&G 
~G106) 


eO118 
~D148) 


, i dade sorted 


6148 BS 86 O07 06 14 66 1E 66 


8156 32 66 64 88 64 BB 2C Bl E8 a3 01 89 O09 GB OO O@.2.3. Bibs ds vee ae 


8166 04 G66 GG 86 GB HB 46 GH BB GH BG 6H BH BH BH HG 
- obort wrth rubot 


66, return ty CP/M - poyvaur Checks Ob. 


Zz 


rs 


“ 


* 


